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本 书 为 严 蔚 敏 、. 吴 伟 民 编著 的 《数据 结构 (C 语言 版 ))( 清 华 大 学 出 版 社 出 版 ,本 书 将 其 简称 为 教科 书 ) 
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本 书 所 有 程序 均 在 计算 机 上 运行 通过 ,这 些 程序 可 通过 清华 大 学 出 版 社 的 网 站 下 载 。 

本 书 适用 于 使 用 严 蔚 敏 . 吴 伟 民 编著 的 《数据 结构 (C 语言 版 )》 作 教材 的 高 等 学 校 学 生 和 自学 者 ,也 可 
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A 
高 等 学 校 教材 . 计算 机 科学 与 技术 出 版 说 明 


改革 开放 以 来 ,特别 是 党 的 十 五 大 以 来 .我国 教育 事业 取得 了 举世 瞩目 的 辉煌 成 就 ,高 等 
教育 实现 了 历史 性 的 跨越 ,已 由 精英 教育 阶段 进入 国际 公认 的 大 众 化 教育 阶段 。 在 质 
量 不 断 提 高 的 基础 上 ,高 等 教育 规模 取得 如 此 快速 的 发 展 , 创 造 了 世界 教育 发 展 史上 的 
奇迹 。 当 前 ,教育 工作 既 面 临 着 千载难逢 的 良好 机 遇 , 同 时 也 面临 着 前 所 未 有 的 严峻 挑 
战 。 社 会 不 断 增 长 的 高 等 教育 需求 同 教育 供给 特别 是 优质 教育 供给 不 足 的 矛盾 ,是 现 
阶段 教育 发 展 面临 的 基本 矛盾 。 

教育 部 一 直 十 分 重视 高 等 教育 质量 工作 。2001 年 8 月 ,教育 部 下 发 了 《关于 加 强 
高 等 学 校本 科教 学 工作 ,提高 教学 质量 的 若干 意见 ), 提 出 了 十 二 条 加 强 本 科教 学 工作 
提高 教学 质量 的 措施 和 意见 。2003 年 6 月 和 2004 年 2 月 ,教育 部 分 别 下 发 了 《关于 启 
动 高 等 学 校 教学 质量 与 教学 改革 工程 精品 课程 建设 工作 的 通知 》 和 《教育 部 实施 精品 课 
程 建设 提高 高 校 教学 质量 和 人 才 培 养 质量 ) 文 件 , 指 出 * 高 等 学 校 教学 质量 和 教学 改革 
工程 ”是 教育 部 正在 制定 的 (2003 一 2007 年 教育 振兴 行动 计划 》 的 重要 组 成 部 分 ,精品 
课程 建设 是 “质量 工程 ”的 重要 内 容 之 一 。 教 育 部 计划 用 五 年 时 间 (2003 一 2007 年 ) 建 
设 1500 门 国家 级 精品 课程 ,利用 现代 化 的 教育 信息 技术 手段 将 精品 课程 的 相关 内 容 上 
网 并 免费 开放 ,以 实现 优质 教学 资源 共享 ,提高 高 等 学 校 教学 质量 和 人 才 培 养 质 量 。 

为 了 深入 贯彻 落实 教育 部 (关于 加 强 高 等 学 校本 科教 学 工作 ,提高 教学 质量 的 若干 
意见 ) 精 神 , 紧 密 配合 教育 部 已 经 启动 的 “高 等 学 校 教学 质量 与 教学 改革 工程 精品 课程 
建设 工作 ”, 在 有 关 专 家 ,教授 的 倡议 和 有 关 部 门 的 大 力 支持 下 ,我 们 组 织 并 成 立 了 “ 清 
华 大 学 出 版 社 教材 编审 委员 会 "(以 下 简称 “ 编 委 会 ”) , 旨 在 配合 教育 部 制定 精品 课程 教 
材 的 出 版 规划 ,讨论 并 实施 精品 课程 教材 的 编写 与 出 版 工作 。“ 编 委 会 ”成员 丝 来 自 全 
国 各 类 高 等 学 校 教学 与 科研 第 一 线 的 骨干 教师 ,其 中 许多 教师 为 各 校 相关 院 、 系 主管 教 
学 的 院 长 或 系 主任 。 

按照 教育 部 的 要 求 ， 编 委 会 "一致 认 为 ,精品 课程 的 建设 工作 从 开始 就 要 坚持 高 标 
准 、 严 要 求 , 处 于 一 个 比较 高 的 起 点 上 ; 精品 课程 教材 应 该 能 够 反映 各 高 校 教学 改革 与 
课程 建设 的 需要 ,要 有 特色 风格 有 创新 性 (新 体系 、 新 内 容 、 新 手段 .新 思路 ,教材 的 内 
容 体系 有 较 高 的 科学 创新 、 技 术 创 新 和 理念 创新 的 含量 )、 先 进 性 (对 原 有 的 学 科 体系 有 
实质 性 的 改革 和 发 展 、 顺 应 并 符合 新 世纪 教学 发 展 的 规律 .代表 并 引领 课程 发 展 的 趋势 
和 方向 ) .示范 性 (教材 所 体现 的 课程 体系 具有 较 广 泛 的 辐射 性 和 示范 性 ) 和 一 定 的 前 瞻 


性 。 教 材 由 个 人 申报 或 各 校 推荐 (通过 所 在 高 校 的 “ 编 委 会 ”成员 推荐 ) ,经 “ 编 委 会 ”认真 评 
审 , 最 后 由 清华 大 学 出 版 社 审定 出 版 。 

目前 ,针对 计算 机 类 和 电子 信息 类 相关 专业 成 立 了 两 个 “ 编 委 会 ”, 即 “清华 大 学 出 版 社 
计算 机 教材 编审 委员 会 ”和 ”清华 大 学 出 版 社 电 子 信息 教材 编审 委员 会 ”>。 首 批 推出 的 特色 


精品 教材 包括 : 


(1) 高 等 学 校 教 材 。 


机 应 用 类 教材 。 


(2) 高 等 学 校 教材 。 
(3) 高 等 学 校 教材 。 
(4) 高 等 学 校 教材 。 
(5) 高 等 学 校 教材 。 
(6) 高 等 学 校 教材 。 


计算 机 应 用 一 一 高 等 学 校 各 类 专业 ,特别 是 非 计 算 机 专业 的 计算 


计算 机 科学 与 技术 一 一 高 等 学 校 计算 机 相关 专业 的 教材 。 
电子 信息 一 高 等 学 校 电子 信息 相关 专业 的 教材 。 

软件 工程 一 一 高 等 学 校 软件 工程 相关 专业 的 教材 。 
信息 管理 与 信息 系统 。 

财经 管理 与 计算 机 应 用 。 


清华 大 学 出 版 社 经 过 20 多 年 的 努力 ,在 教材 尤其 是 计算 机 和 电子 信息 类 专业 教材 出 版 
方面 树立 了 权威 品牌 ,为 我 国 的 高 等 教育 事业 做 出 了 重要 贡献 。 清 华 版 教材 形成 了 技术 准 
确 、 内 容 严谨 的 独特 风格 ,这 种 风格 将 延续 并 反映 在 特色 精品 教材 的 建设 中 。 


清华 大 学 出 版 社 教材 编审 委员 会 
E-mail: dingl@tup. tsinghua. edu. cn 
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高 等 学 校 教材 , 计算 机 科学 与 技术 前 


f 者 多 年 讲授 “数据 结构 "课程 ,所 用 教材 为 清华 大 学 出 版 社 出 版 , 严 蔚 敏 、 吴 伟 民 编著 的 
《数据 结构 (C 语言 版 )》( 以 下 简称 为 教科 书 )。 根 据 多 年 的 授课 经 验 ,作者 深 知 学 习 “ 数 
据 结构 "的 关键 点 : 

"首先 ,要 产生 兴趣 ,兴趣 是 求知 的 动力 。 

。 其 次 ,要 加 强 形象 思维 训练 ,用 形象 思维 帮助 建立 抽象 思维 。 

，* 最 后 ,要 使 算法 活 起 来 ,使 算法 不 再 是 抽象 的 、 枯 燥 的 、 孤 立 的 ,上 涩 的 ,而 是 具 

体 的 .生动 的 .互相 有 联系 的 .易于 理解 的 。 

本 书 是 作者 多 年 来 潜心 研究 的 成 果 , 其 中 有 许多 独到 之 处 : 

一 、 本 书 不 仅 包括 教科 书 中 绝 大 多 数 算法 的 实现 ,对 于 许多 主要 的 存储 结构 ,也 包 
括 了 它们 的 基本 操作 的 实现 。 这 些 基本 操作 构成 了 存储 结构 的 完整 体系 ,使 得 该 存储 
结构 可 以 直接 使 用 在 需要 的 地 方 。 如 在 第 7 章 的 拓扑 排序 中 就 用 到 了 第 3 章 顺 序 栈 的 
存储 结构 和 基本 操作 。 作 者 也 经 常 直 接 将 本 书 的 存储 结构 和 基本 操作 用 在 自己 的 科研 
课题 程序 中 ,效果 都 很 好 。 读 者 如 果 需 要 了 解 少数 教科 书 中 提 及 而 本 书 中 未 提 及 的 算 
法 ,存储 结构 和 基本 操作 ,可 以 参考 阅读 本 书后 面 的 参考 文献 [3]。 

二 、 为 了 加 强 形象 思维 训练 ,作者 绘制 了 各 种 数据 存储 结构 ,算法 、 程 序 运 行 过 程 
的 示意 图 ,共计 281 幅 ( 有 些 图 本 身 又 由 一 系列 小 图 组 成 )。 这 些 图 清楚 地 说 明了 数据 
的 存储 结构 和 算法 。 

三 、 通 过 将 算法 编写 到 计算 机 可 运行 的 程序 中 的 方法 ,使 算法 活 起 来 。 对 于 可 运 
行 的 算法 ,输出 变量 、 单 步 执行 ,设置 断 点 ,修改 算法 、 尝 试 各 种 输入 数据 等 都 是 轻 而 易 
举 的 ,这 些 做 法 都 有 助 于 深刻 地 理解 算法 。 

四 、 对 于 较 难 理解 的 算法 都 有 详细 的 、 图 文 并 茂 的 解析 ,有 些 解 析 ( 如 平衡 二 又 树 ) 
还 包含 作者 自己 的 研究 。 较 为 简单 的 算法 .也 尽量 利用 程序 中 的 空白 处 ,多 加 注释 。 对 
于 相应 于 教科 书 算法 中 须 说 明 的 新 增 行 与 修改 行 , 在 注释 行 中 也 分 别 注 以 “新 增 ”与 “ 修 

五 、 本 书 第 7 章 以 后 的 许多 程序 中 的 数据 来 自 文本 格式 的 数据 文件 ,避免 了 了 人工 
键盘 输入 的 麻烦 ,也 有 利于 掌握 使 用 文件 输入 输出 的 方法 (这 是 很 多 学 生 不 熟悉 , 却 又 
很 重要 的 方法 ) 。 根 据 程序 所 用 文件 的 格式 ,读者 很 容易 编写 出 自己 需要 的 数据 文件 。 

六 、 本 书 除 了 实现 教科 书 中 已 有 的 算法 ,还 实现 了 克 鲁 斯 卡尔 .2- 路 插入 排序 ( 包 


数据 结构 算法 解析 


括 改进 的 2- 路 插入 排序 ) . 树 形 选 择 排序 等 教科 书 中 没有 写 出 的 算法 。 

七 、 本 书 还 包含 了 许多 编程 的 技巧 和 小 窍门 ,这 些 是 作者 多 年 编程 所 积累 的 经 验 。 

有 教科 书 和 本 书 对 算法 和 数据 结构 的 详细 讲解 ,又 有 可 执行 的 程序 ,还 有 程序 的 运行 结 
果 , 加 上 读者 自己 的 思考 和 努力 ,还 有 什么 学 不 会 的 呢 ? 甚至 会 觉得 ,数据 结构 是 简单 的 ,又 
是 有 趣 的 ,还 是 有 用 的 。 其 中 的 许多 算法 是 巧妙 的 .启迪 心智 的 , 币 律 其 中 ,其 乐 无 穷 。 

本 书 紧密 配合 教科 书 , 故 在 章节 编排 上 尽量 与 教科 书 保持 一 致 ,以 便 读 者 对 照 查找 。 教 
科 书 的 第 8 章 和 第 12 章 由 于 内 容 较为 独立 ,并 应 用 较 少 , 故 没 有 收 进 本 书 。 因 此 ,教科 书 的 
第 9、10、11 章 在 本 书 中 相应 地 成 为 第 8、9、10 章 。 同 样 ,教科 书 中 有 些 节 的 内 容 没 有 收 进 本 
书 , 后 面 节 的 编号 随 之 减 小 。 但 各 章节 的 名 称 与 教科 书 保 持 一 致 。 

本 书 所 有 程序 都 在 Borland C 二 + 3. 1 和 Microsoft Visual C 二 + 6.0 下 运行 通过 。 这 些 程 
序 都 可 通过 清华 大 学 出 版 社 的 网 站 (www. tup. tsinghua. edu. cn 或 www. tup. com. cn) 
下 载 。 

本 书 虽 然 是 以 严 蔚 敏 、 吴 伟 民 编著 的 《数据 结构 》(C 语言 版 ) 为 基础 ,但 对 其 他 的 数据 结 
构 教材 的 理解 ,也 极 具 参考 价值 。 

尽管 作者 尽 了 最 大 努力 ,但 限于 水 平 , 书 中 牙 漏 之 处 在 所 难免 ,希望 读者 不 音 赐 教 ,以 便 
将 来 改正 。 读 者 可 通过 本 书 的 作者 (gyfan@chd. edu. cn) 与 编辑 (zhengyk@tup. tsinghua. 
edu. cn) 取 得 联系 。 
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2007 年 11 月 于 长 安 大 学 
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本 书 内 容 主 要 由 实现 基本 操作 和 算法 的 程序 构成 。 这 些 程序 文件 有 6 类 : 

(1) 数据 存储 结构 。 文 件 名 第 一 个 字母 为 c, 以 h 为 扩展 名 。 如 cl-1.h 是 第 1 章 的 第 1 
种 存储 结构 。 

(2) 每 种 存储 结构 的 一 组 基本 操作 函数 。 以 bo(bo 表示 基本 操作 ) 开 头 ,cpp 为 扩展 
名 。 如 bol-1. cpp 是 第 1 章 第 1 种 存储 结构 的 一 组 基本 操作 函数 。 教 科 书 中 涉及 基本 操作 
的 算法 也 收 到 基本 操作 函数 中 , 且 在 函数 中 注 明 算法 的 编号 。 

(3) 调用 基本 操作 的 主 程序 。 以 main(main 表示 主 程序 ) 开 头 ,cpp 为 扩展 名 。 如 
main1-1, cpp 是 调用 bol-1. cpp 的 主 程序 。 

(4) 实现 算法 的 程序 。 以 algo(algo 表示 算法 ) 开 头 ,cpp 为 扩展 名 。 如 algo2-1. cpp 是 
实现 算法 2.7 的 程序 。 

(5) 不 属于 基本 操作 又 被 多 次 调用 的 函数 或 程序 段 。 以 func 开头 ,cpp 为 扩展 名 。 如 
func2-2. cpp 中 的 函数 equal() .comp() ,print() 等 被 许多 程序 调用 。 为 节约 篇 幅 , 将 这 些 函 
数 放 到 func2-2. cpp 中 。 

(6) 数据 文件 。 以 txt 为 扩展 名 ,如 第 7 章 的 f7-1. txt 等 。 

只 有 以 main algo 开头 的 程序 文件 有 主 函数 main() ,而 且 是 可 执行 的 程序 。 其 他 程序 
都 是 被 调用 的 程序 ,通过 #include 命令 包括 在 可 执行 程序 中 ,它们 可 能 被 多 次 调用 ,为 了 节 
省 篇 幅 , 只 出 现在 书 中 第 1 次 调用 前 。 


11 抽象 数据 类 型 的 表示 与 实现 


教科 书 定义 OK 、ERROR 等 为 函数 的 结果 状态 代码 ,Status 为 其 类 型 ,把 这 些 信 息 放 到 
头 文件 cl.h 中 。cl.h 还 包含 一 些 常 用 的 头 文件 ,如 string. h、stdio. h 等 。 为 了 操作 方便 ， 
本 书 几乎 每 一 个 程序 都 把 cl.h 包含 进去 ,也 就 把 这 些 结果 状态 代码 的 定义 和 头 文件 包含 了 
进去 。 对 于 某 一 个 程序 来 说 ,有 些 结果 状态 代码 和 头 文件 并 没有 用 到 ,不 过 这 不 影响 使 用 。 
头 文件 cl.h 内 容 如 下 : 

// cl.h (文件 名 ) 

间 include 一 string.h>> // 字符 串 函 数 头 文件 

间 include 一 ctype.h> // 字符 函数 头 文件 
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间 include 一 malloc.h>> // malloc() 等 

间 include 一 limits.h>> // INT_MRX 等 

间 include 一 stdio.h>> // 标准 输入 输出 头 文件 ,包括 EOF( = "zZ 或 F6) ,NULL 等 
#include=stdlib.h> // atoi() ,exit() 

#include<io.h> // eof() 

间 include 二 math.h>> // 数学 函数 头 文件 ,包括 floor() ,ceil() ,abs() 等 
#include< sys/timeb. h> // ftime() 

间 include 一 stdarg.h>> // 提供 宏 va_start,va arg 和 va_end, 用 于 存 取 变 长 参数 表 
// 函数 结果 状态 代码 。 在 教科 书 第 10 页 

#define TRUE 1 

#define FALSE 0 

#define OK 1 

#define ERROR 0 

// #define INFEASIBLE -1 没 使 用 

// #define OVERFLOW -2 因为 在 math.h 中 已 定义 OVERFLOW 的 值 为 3, 故 去掉 此 行 
typedef int Status; // Status 是 函数 的 类 型 ,其 值 是 函数 结果 状态 代码 ,如 OK 等 
typedef int Boolean; // Boolean 是 布尔 类 型 ,其 值 是 TRUE 或 FALSE, 第 7.8 章 用 到 


教科 书 中 的 例 1-7 定义 了 一 个 三 元 组 的 抽象 数据 类 型 Triplet。 通 过 例 1-7, 给 出 了 这 
个 三 元 组 的 表示 方法 和 所 定义 的 基本 操作 函数 的 实现 。 

例 1-7 实际 上 是 教科 书 第 2 一 7 章 中 各 种 存储 结构 的 一 个 范例 : 定义 一 种 存储 结构 及 建 
立 在 这 种 存储 结构 上 的 一 组 基本 操作 ,并 给 出 基本 操作 的 实现 。 下 面 就 是 例 1-7 在 程序 中 


的 具体 实现 。 Triplet ElemType 
头 文件 cl-1. h 定义 了 三 元 组 的 抽象 数据 类 型 Triplet。 | 

它 采用 动态 分 配 的 顺序 存储 结构 ( 见 图 1-1)。 用 动 训 从 司 交 
// cl-1.h 采用 动态 分 配 的 顺序 存储 结构 。 在 教科 书 第 12 页 顺序 存储 结构 


typedef ElemType * Triplet; // 由 InitTriplet 分 配 3 个 元 素 存 储 空间 

// Triplet 类 型 是 ElemType 类 型 的 指针 ,存放 ElemType 类 型 的 地 址 

在 cl-1.h 中 遇 到 ElemType( 元 素 类 型 ) ,在 后 面 的 章节 中 还 会 遇 到 SElemType( 栈 元 素 
类 型 ) .QElemType( 队 列 元 素 类 型 )、TElemType( 树 元 素 类 型 ) 和 VertexType( 图 的 顶点 元 
素 类 型 ) 等 。 在 诸如 cl-1.h 这 类 头 文件 中 ,它们 是 抽象 的 数据 类 型 ,也 称 为 多 形 数据 类 型 。 
可 以 根据 需要 在 主 程 中 设置 为 具体 的 类 型 。 

bol-1. cpp 是 有 关 抽 象 数据 类 型 Triplet 和 ElemType 的 8 个 基本 操作 函数 。 这 8 个 函 
数 返 回 值 的 类 型 都 是 Status, 即 函数 返回 值 只 能 是 头 文件 cl. h 中 定义 的 OK 、ERROR 等 。 

// bol-1. cpp 抽象 数据 类 型 Triplet 和 ElemType( 由 cl-1.h 定义 ) 的 基本 操作 (8 个) 

Status InitTriplet(Triplet &T,ElemType v1 .ElemType v2.ElemType v3) 


// 操作 结果 : 构造 三 元 组 了 ,依次 置 了 的 3 个 元 素 的 初 值 为 中 ,v2 和 v3。 在 教科 书 第 12 页 ( 见 图 1-2) 
T= (ElemType * )malloc(3 x sizeof(ElemType)); // 分 配 3 个 元 素 的 存储 空间 


ifE(CIT) 

exit(OVERFLOW) ; // 分 配 失败 则 退出 | vl v2 v3 
TLo] = v1,T[1] = v2,T[2] = v3; 下 T[0 TD] TD] 
return OK; 


图 1-2 构造 三 元 组 
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} 
Status DestroyTriplet (Triplet &T) 
{ // 操作 结果 : 三 元 组 了 被 销毁 。 在 教科 书 第 12 页 ( 见 图 1-3) 


free(T) ; // 释放 了 所 指 的 三 元 组 存储 空间 [Ca | 
T= NULL; // 了 不 再 指向 任何 存储 单元 
return OK; 图 1-3 三 元 组 T 被 销毁 


} 

Status Get(Triplet T,int i,ElemType &e) 

{ // 初始 条 件 : 三 元 组 ?已 存在 ,1<i<3。 操 作 结果 : 用 e 返回 7 了 的 第 i 元 的 值 。 在 教科 书 第 12 页 
if(i<1||i>3) // i 不 在 三 元 组 的 范围 之 内 

return ERROR; 
e=TLi-1]; // 将 三 元 组 ?的 第 i 个 元 素 的 值 赋 给 e 
return OK; 

} 

Status Put(Triplet T,int i,ElemType e) 

{ // 初始 条 件 : 三 元 组 ?已 存在 ,1<i<3。 操 作 结 果 : 改变 了 的 第 i 元 的 值 为 e。 在 教科 书 第 12 页 
iE(i<1||i>3) // i 不 在 三 元 组 的 范围 之 内 

return ERROR; 
T[i-1]=e; // 将 e 的 值 赋 给 三 元 组 7 的 第 i 个 元 素 
return OK; 

} 

Status IsAscending(Triplet T) // 在 教科 书 第 13 页 

{ // 初始 条 件 : 三 元 组 了 已 存在 。 操 作 结 果 : 如 果 了 的 3 个 元 素 按 升 序 排列 , 则 返回 1; 否则 返回 0 
return(T[0] 一 = TL1]S&&T[1] 一 = TL2]); // 只 在 TL[0] 不 大 于 T[1] 且 7?[1] 不 大 于 T[2] 时 返回 真 

} 

Status IsDescending(Triplet T) // 在 教科 书 第 13 页 

{ // 初始 条 件 : 三 元 组 了 已 存在 。 操 作 结 果 : 如 果 了 的 3 个 元 素 按 降 序 排列 , 则 返回 1; 否则 返回 0 
return(T[0]>= 了 [1]&gT[1]>= 了 T[2]); // 只 在 了 [0J 不 小 于 7[1] 且 7[1J] 不 小 于 [2] 时 返回 真 

} 

Status Max(Triplet T,ElemTYpe &e) 

{ // 初始 条 件 : 三 元 组 ?已 存在 。 操 作 结 果 : 用 e 返回 指向 了 的 最 大 元 素 的 值 。 在 教科 书 第 13 页 
e= (ITL0]>=TL1])?CTLO]>=TL2]?TL0]:TL2]):(TL]>= 开 2]?TL1]:TL2]);，// 贬 套 的 条 件 运 算 符 
return OK; 

} 

Status Min(Triplet T,ElemType &e) 

{ // 初始 条 件 : 三 元 组 ?已 存在 。 操 作 结 果 : 用 e 返回 指向 了 的 最 小 元 素 的 值 。 在 教科 书 第 13 页 
e= (TL0]<=TLI])?CTLO]<=TL2]?TL0]:TL2]):(CTL<=TL2]?TL1]:TL2]); // 嵌 套 的 条 件 运 算 符 
return OK; 

} 


mainl-1. cpp 是 检验 bol-1. cpp 中 的 各 基本 操作 函数 是 否 正确 的 主 函 数 。 在 mainl-1. cpp 


中 可 根据 需要 定义 抽象 数据 类 型 ElemType 为 int、double 或 其 他 数值 型 类 型 (只 能 是 数值 
类 型 ,因为 其 中 有 几 个 函数 是 比较 大 小 的 ) ,而 无 须 改 变 基本 操作 bol-1. cpp, 这 使 得 bol-1. cpp 
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的 通用 性 大 大 增强 。funcl-1. cpp 是 输出 函数 ,根据 ElemType 在 主 函数 中 被 定义 的 类 型 选 
择 合适 的 语句 。 


// funcl-1.cpp 输出 函数 

void PrintE(ElemType e) // 输出 元 素 的 值 

{ printf("%d\n",e); // 定义 ElemType 为 整 型 选 此 句 。 第 3 行 

//printf("%f\n",e); // 定义 ElemType 为 双 精 度 型 选 此 句 。 第 4 行 

} 

void PrintT(Triplet T) // 依次 输出 三 元 组 的 值 

{ printf("%d, %d, %d\n",T[0],T[1],T[2]); // 定义 ElemType 为 整 型 选 此 句 。 第 7 行 
//printf("%f, %f, Sf\n" ,TLO],T[1],T[2]); // 定义 ElemType 为 双 精度 型 选 此 句 。 第 8 行 
} 


// mainl-1. cpp 检验 基本 操作 bol-1. cpp 的 主 函 数 
间 include"c1.h" // 要 将 程序 中 所 有 # include 命令 所 包含 的 文件 复制 到 当前 目录 下 
// 以 下 两 行 可 根据 需要 选 其 一 ( 且 只 能 选 其 一 ) ,而 无 须 改 变 基 本 操作 bol-1.cpp 
typedef int ElemType; // 定义 抽象 数据 类 型 ElemType 在 本 程序 中 为 整 型 。 第 4 行 
//typedef double ElemType; // 定义 抽象 数据 类 型 ElemType 在 本 程序 中 为 双 精 度 型 。 第 5 行 
间 include"c1-1.h" // 在 此 命令 之 前 要 定义 ElemType 的 类 型 
# include"bol-1.cpp" // 在 此 命令 之 前 要 包括 cl-1.h 文 件 (因为 其 中 定义 了 Triplet) 
间 include"func1-1.cpp" // 输出 函数 ,根据 ElemType 的 类 型 选择 不 同 的 语句 
void main( ) 
{ 

Triplet T; 

ElemType my 

Status i; 

i= InitTriplet(T,5,7,9); // 初始 化 三 元 组 T, 其 3 个 元 素 依次 为 5,7,9。 第 14 行 
//i= InitTriplet(T,5.0,7.1,9.3); // 当 ElemType 为 双 精度 型 时 ,可 取代 上 句 。 第 15 行 

printf(" 调 用 初始 化 函数 后 ,i=%d(1: 成 功 )。T 的 3 个 值 为 ",i); 

PrintT(T); // 输出 了 的 3 个 值 

i=Get(T,2,m); // 将 三 元 组 T 的 第 2 个 值 赋 给 m 

if(i== OK) // 调用 Get() 成 功 

{ printf("T 的 第 2 个 值 为 "); 

PrintE(m); // 输出 m( = T[1]) 

} 

i= Put(T,2,6); // 将 三 元 组 ?的 第 2 个 值 改 为 6 

if(i== OK) // 调用 Put() 成 功 

{ printf(" 将 了 的 第 2 个 值 改 为 6 后 .了 的 3 个 值 为 "); 

PrintT(T); // 输出 了 的 3 个 值 

} 

i= IsAscending(T); // 测试 升序 的 函数 

printf(" 调 用 测试 升序 的 函数 后 ,i=%d(0: 否 1: 是 )\n" ,i); 

i = IsDescending(T); // 测试 降序 的 函数 

printf(" 调 用 测试 降序 的 函数 后 ,i=%d(0: 否 1: 是 )\n" ,i); 


同时 


第 1 章 绪论 


if((i= Max(T,m)) == OK) // 先 赋值 再 比较 
{ printf("T 中 的 最 大 值 为 "); 
PrintE(m); // 输出 最 大 值 m 
} 
if((i= Min(T,m)) == OK) 
{ printf("T 中 的 最 小 值 为 "); 
PrintE(m); // 输出 最 小 值 m 
} 
DestroyTriplet(T); // 函数 也 可 以 不 带 回 返回 值 
printf(" 销 毁 T 了 后 ,T=%u\n",T); 
} 


程序 运行 结果 : 


调用 初始 化 函数 后 ,i=1(1: 成 功 )。T 的 3 个 值 为 5,7.9 
T 了 的 第 2 个 值 为 7 

将 了 的 第 2 个 值 改 为 6 后 ,T 的 3 个 值 为 5,6,9 

调用 测试 升序 的 函数 后 ,i= 1(0: 否 1: 是 ) 

调用 测试 降序 的 函数 后 ,i= 0(0: 否 1: 是 ) 

了 中 的 最 大 值 为 9 

T 了 中 的 最 小 值 为 5 

销毁 了 后 ,T=0 


把 main1-1. cpp 的 第 4、14 行 注释 掉 , 启 用 第 5、15 行 , 定 义 ElemType 为 double 类 型 。 
把 funcl-l. cpp 的 第 3、7 行 的 语句 注释 掉 (*{” 不 能 注释 掉 ), 启 用 第 4、8 行 ,定义 


ElemType 为 double 类 型 的 输出 语句 , 则 程序 运行 结果 如 下 : 


main 
数据 
第 二 
数 类 


调用 初始 化 函数 后 ,i= 1(1: 成 功 )。T 的 3 个 值 为 5.000000,7.100000,9.300000 
了 的 第 2 个 值 为 7.100000 

将 了 的 第 2 个 值 改 为 6 后 .T 的 3 个 值 为 5.000000,6.000000,9.300000 

调用 测试 升序 的 函数 后 ,i=1(0: 否 1: 是 ) 

调用 测试 降序 的 函数 后 ,i= 0(0: 否 1: 是 ) 

T 中 的 最 大 值 为 9.300000 

T 中 的 最 小 值 为 5.000000 

销毁 了 后 ,T=0 


mainl-1. cpp 是 运行 的 第 1 个 程序 。 通 过 运行 main1-1. cpp, 要 掌握 这 样 几 点 : 第 一 ， 
-1. cpp 是 提供 本 书 程序 风格 的 一 个 例子 , 它 是 教科 书 中 例 1-7 的 完整 实现 ,通过 它 ,把 
的 存储 结构 ,建立 于 此 结构 上 的 基本 操作 函数 以 及 调用 这 些 函 数 的 主 程序 结合 到 一 起 ; 
,将 抽象 的 数据 类 型 根据 实际 需要 具体 化 的 方法 ; 第 三 ,函数 类 型 Status 的 应 用 : 车 函 
型 为 Status, 它 的 返回 值 只 能 是 OK ERROR 等 ; 第 四 ,熟悉 C 语言 中 malloc 函数 的 使 


用 ,在 学 习 C 语言 时 ,malloc 函数 使 用 得 并 不 多 ,但 在 “数据 结构 ”中 它 却 几乎 是 使 用 最 多 的 
函数 。 


目录 


注意 : 只 有 将 cl. h、cl-1.h、bol-1. cpp 和 funcl-1. cpp 四 个 文件 复制 到 mainl-1. cpp 的 
下 ,才能 正确 运行 mainl1-1. cpp。 
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本 书 的 所 有 程序 可 以 在 Borland C++ 3. 1 环境 下 运行 ,也 可 在 Microsoft Visual 
C++H6.0 环境 下 运行 。 本 书 中 所 列 的 程序 运行 结果 是 Borland C++ 3. 1 环境 下 的 , 它 和 
Microsoft Visual C++ 6. 0 环境 下 的 基本 一 样 ,只 是 整 型 最 大 值 . 指 针 变 量 的 值 等 有 所 
不 同 。 

在 Microsoft Visual C 十 -6.0 环境 下 运行 的 一 种 方法 是 : 将 所 有 需要 的 文件 复制 在 
同一 个 子 目 录 下 ,再 在 “Windows 资源 管理 器 "中 双击 含有 主 函数 main() 的 程序 ,进入 
到 VC++6.0 的 环境 。 按 F7 键 编译 , 没 错误 的 话 按 Ctrl 十 F5 键 运行 。 另 一 种 方法 是 : 先 
进入 VC++6.0 的 环境 , 单 击 主 菜单 File, 选 Open, 在 “打开 ”文件 对 话 框 中 选择 含有 主 函 数 
main() 的 程序 ,进入 到 VC 二 -6.0 的 环境 。 仍 然 按 F7 键 编译 , 没 错误 的 话 按 Ctrl 十 F5 键 运行 。 
如 果 是 新 编程 序 , 单 击 主 菜单 File 之 后 ,选择 New 选项 ,在 Files 选项 卡 中 选择 
C+ 二 Source File, 给 出 File name 和 Location( 文 件 名 和 路 径 ) 后 , 单 击 OK 按钮 就 可 编写 
程序 。 

本 书 中 的 main 主 程序 是 用 于 检验 相应 bo 程序 中 的 基本 操作 各 个 函数 程序 是 否 正确 
的 , 它 往 往 很 长 。 若 读者 对 某 个 基本 操作 函数 特别 关注 ,就 可 以 对 相应 的 main 主 程序 进行 
删改 ,以 适应 自己 的 需要 ,又 不 必 花 太 多 的 时 间 去 输入 程序 。 

在 bol-1.cpp 中 ,有 些 基 本 函数 的 形 参 带 有 *“&.”, 如 第 一 个 基本 函数 的 声明 : 


Status InitTriplet(Triplet &T,ElemType v1 ,ElemType v2 ,ElemTYpe v3); 


其 中 , 形 参 T 前 带 有 & ,说明 形 参 T 是 引用 类 型 的 。 引 用 类 型 是 C++ 语言 特有 的 。 引 用 类 
型 的 变量 ,其 值 若 在 函数 中 发 生变 化 , 则 变化 的 值 会 带 回 主 调 函 数 中 。 程 序 algol-1. cpp 说 
明了 函数 中 引用 类 型 变量 和 非 引 用 类 型 变量 的 区 别 。 


// algol-1.cpp 变量 的 引用 类 型 和 非 引 用 类 型 的 区 别 
间 include"ci.h" 
void fa(int a) // 在 函数 中 改变 a, 将 不 会 带 回 主 调 函 数 ( 主 调 函 数 中 的 a 仍 是 原 值 ) 
{atts 
printf(" 在 函数 fa 中 : a=%d\n" .a); 
} 
void fb(int &a) // 由 于 a 为 引用 类 型 ,在 函数 中 改变 a, 其 值 将 带 回 主 调 函 数 
{ at++; 
printf(" 在 函数 fb 中 : a=%d\n" ,a); 
} 
void main() 
{ 
int n=1; 
printf(" 在 主 程 中 ,调用 晴 数 fa 之 前 : n=%d\n",n); 
fa(n); 
printf(" 在 主 程 中 ,调用 函数 fa 之 后 ,调用 函数 fb 之 前 : n=%d\n",n); 
fb(n); 
printf(" 在 主 程 中 ,调用 晴 数 fb 之 后 : n=%d\n",n); 


程序 运行 结果 : 

在 主 程 中 ,调用 函数 fa 之 前 : n=1 

在 函数 fa 中 : a=2 

在 主 程 中 ,调用 函数 fa 之 后 ,调用 函数 fb 之 前 : n=1 
在 函数 fb 中 : a=2 

在 主 程 中 ,调用 函数 fb 之 后 : n=2 


标准 C 语言 中 没有 引用 类 型 ,如果 需要 在 标准 C 语言 环境 下 运行 本 书 中 的 程序 , 则 需 
要 对 程序 做 少许 修改 .转换 ,其 方法 详 见 附录 A。 读 者 也 可 以 参考 本 书后 面 的 参考 文献 [3] 
一 书 所 附带 的 光盘 。 其 中 ,\TC 子 目录 下 的 程序 是 在 Turbo C 2. 0 下 运行 通过 的 , 且 与 \BC 
子 目录 下 的 可 在 Borland C++H 3.1 和 Microsoft Visual C+ 十 - 6. 0 环境 下 运行 的 程序 是 逐个 语 
句 对 应 的 。 


12 算法 和 算法 分 析 


同样 是 计算 1 一 1/ x 十 1/(x* x)… ,algol-2. cpp 的 语句 频 度 表达 式 为 (1 十 n) Xn/2, 它 的 时 间 
复杂 度 T(n) 二 OC(m); 而 algol-3. cpp 的 语句 频 度 表 达 式 为 n, 它 的 时 间 复 杂 度 T(n) 二 O(n)。 
从 两 个 程序 的 运行 结果 可 以 看 出 : 当 输 入 数据 一 样 时 ,计算 结果 是 一 样 的 ,但 运行 时 间 的 差 
别 很 大 。 在 算法 正确 的 前 提 下 ,应 该 选择 算法 效率 高 的 。 


// algol-2.cpp 计算 1-1/x+1/(xx x)*… 
间 include"c1.h" 
void main() 
{ 
timeb tl ,t2; 
long t; 
double x,sum= 1,sunml; 
int i,j,n; 
printf(" 请 输入 x n: "); 
scanf("%]1f %d",&x,&n); 
ftime(&t1); // 求 得 当前 时 间 
for(i=1;i<=n;i++) 
{ suml=1; 
for(j=1;j<==i;j++) 
suml = suml * (—1.0/x); 
sum+= suml; 
} 
ftime(&t2); // 求 得 当前 时 间 
t= (t2.time— t1.time) x*1000+ (t2.millitm-t1.millitm); // 计算 时 间 差 
printf("sum = 名 1f, 用 时 名 1d 毫秒 \n" .sum,t); 
} 


程序 运行 结果 (其 中 用 时 与 计算 机 的 配置 有 关 , 带 下 划 线 部 分 ,由 键盘 输入 ) : 
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请 输入 x n: 123 10000 w 
sum = 0.991935, 用 时 5440 毫秒 


// algol-3.cpp 计算 1- 1/x+1/(x* x)… 的 更 快捷 的 算法 
间 include"c1.h" 
void main() 
{ 
timeb t1,t2; 
long t; 
double x,suml = 1,sum= 1; 
int i,n; 
printf(" 请 输入 x n:"); 
scanf("%1f %d",&x,&n); 
ftime(&gt1); // 求 得 当前 时 间 
for(i=1;i<=n;i++) 
{ suml #*= 一 1.0/x; 
sum+= suml; 
} 
ftime(&t2); // 求 得 当前 时 间 
t= (t2. time— tl1.time) * 1000+(t2.millitm-tl.millitm); // 计算 时 间 差 
printf("sum=%1f, 用 时 $%1ld 毫秒 \n" ,sum,t); 
} 


程序 运行 结果 : 


请 输入 x n: 123 10000 
sum = 0.991935, 用 时 0 毫秒 


2.1 线性 表 的 类 型 定义 


线性 表 的 基本 操作 共有 12 个 。 通 过 将 基本 操作 有 机 地 组 合 ,还 可 以 对 线性 表 进行 较 复 
杂 的 处 理 。 算 法 2. 1 和 算法 2. 2( 在 func2-1. cpp 中 ) 就 是 这 样 的 例子 。 

注意 到 算法 2. 1 和 算法 2. 2 的 形 参 La、Lb 和 Lc 的 类 型 是 List( 表 ) ,List 并 不 是 稍 后 将 
要 介绍 的 具体 的 线性 表 存 储 结构 如 SqList 和 LinkList 等 , 它 是 抽象 的 线性 表 类 型 。 算 
法 2. 1 和 算法 2. 2 中 所 涉及 的 函数 都 是 线性 表 的 基本 操作 ,如 GetElem()、ListLength() 
等 ,所 涉及 的 变量 类 型 也 都 是 C 语言 的 数据 类 型 ,不 涉及 具体 的 线性 表 存储 结构 。 这 样 , 算 
法 2. 1 和 算法 2. 2 就 可 以 应 用 到 任何 一 种 具体 的 线性 表 存 储 结构 中 ,只 要 这 种 存储 结构 的 
基本 操作 函数 GetElem() 、ListLength() 等 已 编写 即 可 。 


// func2-1. cpp 算法 2.1 和 算法 2.2 
void Union(List &La,List Lb) // 算法 2.1 
{ // 将 所 有 在 线性 表 Lb 中 但 不 在 Ia 中 的 数据 元 素 插入 到 表 La 中 (不 改变 表 Lb) 
ElemType e; 
int La_len,Lb len; 
int i; 
La_len = ListLength(La); // 求 线性 表 La 的 长 度 
Lb_len = ListLength(Lb); // 求 线性 表 Lb 的 长 度 
for(i=1;i<= Lb len;i++ ) // 从 表 Lb 的 第 1 个 元 素 到 最 后 1 个 元 素 
{ GetElem(Lb,i,e); // 取 表 Lb 中 第 并 个 数据 元 素 的 值 赋 给 e 
if(1LocateElem(La,e,equal)) // 表 La 中 不 存在 和 e 相同 的 元 素 
ListInsert(La,++ La_len,e); // 在 表 La 的 最 后 插入 元 素 e 
} 
} 
void MergeList(List La,List Lb,List &Lc) // 算法 2.2 
{ // 已 知 线性 表 La 和 Lb 中 的 数据 元 素 按 值 非 递减 排列 。 
// 归并 La 和 Lb 得 到 新 的 线性 表 Lc,Lc 的 数据 元 素 也 按 值 非 递减 排列 (不 改变 表 Ia 和 表 Lb) 
int i=1,j=1,k=0; 
int La len,Lb len; 
ElemType ai,bj; 
InitList(Lc); // 创建 空 表 Lc 
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La_len = ListLength(La); // 求 线性 表 La 的 长 度 
Lb_len = ListLength(Lb); // 求 线性 表 Lb 的 长 度 
while(i 一 = La_len&&j 一 = Lb len) // ij 分 别 指示 表 La 和 表 Lb 中 的 元 素 序 号 
{ GetElem(La,i,ai); // 取 表 La 中 第 i 个 数据 元 素 的 值 赋 给 ai 
GetElem(Lb,j,bj); // 取 表 Lb 中 第 j 个 数据 元 素 的 值 赋 给 bj 
if(ai<=bj) // 表 Ia 的 当前 元 素 不 大 于 表 Lb 的 当前 元 素 
{ ListInsert(Lc,++k,ai); // 在 表 Lc 的 最 后 插入 元 素 ai 
++ is // 并 指示 表 La 中 的 下 一 个 元 素 
else 
{ ListInsert(Ic,++k,bj); // 在 表 rc 的 最 后 插入 元 素 bj 
++j; // 了 j 指 示 表 Lb 中 的 下 一 个 元 素 
} 
} // 以 下 两 个 while 循环 只 会 有 一 个 被 执行 
while(i<= La_len) // 表 Ia 中 还 有 元 素 未 插入 到 表 Lc 
{ GetElem(La,i++,ai); // 取 表 La 中 第 i 个 数据 元 素 的 值 赋 给 ai,i 指示 表 La 中 的 下 一 个 元 素 
ListInsert(Lc,++k,ai); // 在 表 Lc 的 最 后 插 人 元 素 ai 
} 
while(j 一 = Lb_len) // 表 Lb 中 还 有 元 素 未 插入 到 表 Lc 
{ GetElem(Lb,j++,bj); // 取 表 Lb 中 第 j 个 数据 元 素 的 值 赋 给 bj,j 指示 表 Lb 中 的 下 一 个 元 素 
ListInsert(Lc,++k,bj); // 在 表 Lc 的 最 后 插入 元 素 bj 
} 
} 


可 分 别 采用 SqList 和 LinkList 两 种 线性 表 存 储 结构 调用 func2-1. cpp 实现 算法 2.1 和 
算法 2. 2 的 程序 是 2. 3. 1 节 的 algo2-2. cpp。 


22 线性 表 的 顺序 表示 和 实现 


顺序 表 存储 结构 容易 实现 随机 存 取 线 性 表 的 第 i 个 数据 元 素 的 操作 ,但 在 实现 插入 或 
删除 操作 时 要 移动 大 量 数据 元 素 。 所 以 , 它 适 用 于 数据 相对 稳定 的 线性 表 , 如 职工 工资 表 、 
学 生 学 籍 表 等 。 


// c2-1.h 线性 表 的 动态 分 配 顺 序 存储 结构 。 在 教科 书 第 22 页 ( 见 图 2-1) 
间 define LIST_INIT_SIZE 10 // 线性 表 存储 空间 的 初始 分 配 量 
并 define LIST_INCREMENT 2 // 线性 表 存 储 空间 的 分 配 增 量 
struct SqList 
{ ElemType * elem; // 存储 空间 基 址 

int length; // 当前 长 度 

int listsize; // 当前 分 配 的 存储 容量 (以 sizeof(ElemType) 为 单位 ) 
1s 


在 图 2-1 中 ,用 一 个 始 于 elem 的 箭头 表示 elem 是 指针 类 型 。 用 该 箭头 止 于 ElemType 
类 型 表示 elem 是 ElemType 类 型 的 指针 。 因 为 此 处 并 不 是 说 明 ElemType 类 型 , 故 用 虚线 


第 2 章 ”线性 表 


表示 。 图 2-2 是 根据 c2-1.h 定义 的 有 2 个 数据 元 素 (2,6)、12 个 存储 空间 的 顺序 表 。 


本 ”| 2 |[0] 
SqList ElemType 三 6 [1] 
oem lL E : |: 
length [10] 
listsize [11] 
图 2-1 动态 分 配 顺序 存储 结构 图 2-2 有 2 个 数据 元 素 (2,6) 12 个 
存储 空间 的 顺序 线性 表 L 


bo2-1. cpp 是 基于 顺序 表 的 基本 操作 。 由 于 C++ 函数 可 重 载 ,故去 掉 bo2-1. cpp 中 算 
法 2.3 等 函数 名 中 表示 存储 类 型 的 后 级 _Sq。c2-1. h 不 采用 固定 数组 作为 线性 表 的 存储 结 
构 ,而 是 采用 动态 分 配 的 存储 结构 ,这样 可 以 合理 地 利用 空间 ,使 长 表 占 用 的 存储 空间 多 , 短 
表 占 用 的 存储 空间 少 。 这 些 可 通过 bo2-1. cpp 中 基本 操作 函数 ListInsert() 和 图 2-6 清楚 地 
看 出 。 


// bo2-1. cpp 顺序 存储 的 线性 表 ( 存 储 结构 由 c2-1.h 定义 ) 的 基本 操作 (12 个 ) ,包括 算法 2.3 一 算法 2.6 
void InitList(SqList &L) // 算法 2.3 


{ // 操作 结果 : 构造 一 个 空 的 顺序 线性 表 D( 见 图 2-3) Tj 
L.elem= (ElemType * )malloc(LIST INIT SIZE * sizeof(ElemType)); 0 [1] 
if(1L. elem) // 存储 分 配 失败 ww : 

exit(OVERFLON) ; 上 上 四 
L. length= 0; // 空 表 长 度 为 0 四 


L.1listsize= LIST_INIT_SIZE; // 初始 存储 容量 


) 图 2-3 构造 一 个 空 的 


顺序 线性 表 L 
void DestroyList(SqList &L) 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 。 操 作 结果 : 销毁 顺序 线性 表 LL( 见 图 2-4) 
free(L. elem) ; // 释放 L.elem 所 指 的 存储 空间 NULL 
L. elem 一 NULL; // L. elem 不 再 指向 任何 存储 单元 0 
L. length=0; 
L. listsize=0; EE 


} 
void ClearList(SqList gL) 图 2-4 销毁 顺序 线性 表 上 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 。 操 作 结果 : 将 工 重 置 为 空 表 ( 见 图 2-5) 

L. length= 0; 
} 
Status ListEmpty(SqList L) 


[0] 

( // 初始 条 件 : 顺序 线性 表 工 已 存在 。 | 一 
// 操作 结果 : 车 工 为 空 表 , 则 返回 TRUE; 否则 返回 FALSE 12 2 
if(L. length == 0) L a 

[10] 
return TRUE; 0 
else rt 
return FALSE; 图 2-5 有 12 个 存储 空 


} 间 的 空 表 工 
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int ListLength(SqList L) 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 。 操 作 结果 : 返回 工 中 数据 元 素 的 个 数 
return L. length; 
} 
Status GetElem(SqList L,int i,ElemType &e) 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 ,1<i<ListLength(L) 
// 操作 结果 : 用 e 返 回 工 中 第 i 个 数据 元 素 的 值 
if(i<1||i>L. length) // i 不 在 表 工 的 范围 之 内 
return ERROR; 
e=x (Lelem+i-1); // 将 表 工 的 第 i 个 元 素 的 值 赋 给 e 
return OK; 
} 
int LocateElem(SqList L,ElemType e,Status( * compare) (ElemType.ElemType)) 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 ,compare() 是 数据 元 素 判 定 函数 (满足 为 1, 否则 为 0) 
// 操作 结果 : 返回 工 中 第 1 个 与 e 满 足 关系 compare() 的 数据 元 素 的 位 序 。 
A 若 这 样 的 数据 元 素 不 存在 , 则 返回 值 为 0。 算 法 2.6 
int i=1; // i 的 初 值 为 第 1 个 元 素 的 位 序 
ElemType * p=L.elem; // Pp 的 初 值 为 第 1 个 元 素 的 存储 位 置 
while(i 二 =L. length&&1compare( *p++,e)) // 让 未 超出 表 的 范围 是 未 找到 满足 关系 的 数据 元 素 
++ i; // 继续 向 后 找 
if(i<=L.length) // 找到 满足 关系 的 数据 元 素 
return i; // 返回 其 位 序 
else // 未 找到 满足 关系 的 数据 元 素 
return 0; 
} 
Status PriorElem( SqList L,ElemType cur e.ElemType &pre e) 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 第 一 个 , 则 用 pre_e 返回 它 的 前 驱 ; 
// 否则 操作 失败 ,pre_e 无 定义 
int i=2; // 从 第 2 个 元 素 开始 
ElemType * p=L.elem+1; // p 指 向 第 2 个 元 素 
while(i<= L.length&&xp!= cur_e) // i 未 超出 表 的 范围 是 未 找到 值 为 cur_e 的 元 素 
{ pt++; // p 指 向 下 一 个 元 素 
i++; // 计数 加 1 
} 
i(i>L. length) // 到 表 结 束 处 还 未 找到 值 为 cur_e 的 元 素 
return ERROR; // 操作 失败 
else // 找到 值 为 cur_e 的 元 素 , 并 由 p 指 向 其 
{ pre_e=#x* 一 pi // p 指 向 前 一 个 元 素 (cur_e 的 前 驱 ) ,将 所 指 元 素 的 值 赋 给 pre_e 
return OK; // 操作 成 功 


} 
Status NextElem( SqList L,ElemType cur e.ElemType &next e) 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 最 后 一 个 , 则 用 next_e 返回 它 的 后 继 ， 


// 否则 操作 失败 ,next_e 无 定义 
int i=1; // 从 第 1 个 元 素 开始 

ElemType * p=L.elem; // p 指 向 第 1 个 元 素 
while(i 一 L. length&& x pl = cur e) // i 未 到 表 尾 且 未 找到 值 为 cur_e 的 元 素 


{ p++; // p 指 向 下 一 个 元 素 


六 本; // 计数 加 1 


} 
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if(i== LL.1length) // 到 表 尾 的 前 一 个 元 素 还 未 找到 值 为 cur_e 的 元 素 


return ERROR; // 操作 失败 


else // 找到 值 为 cur_e 的 元 素 , 并 由 指向 其 
{ next_e=x* ++p; // p 指 向 下 一 个 元 素 (cur_e 的 后 继 ) ,将 所 指 元 素 的 值 赋 给 next _e 


return OK; // 操作 成 功 


} 


Status ListInsert(SqList &L,int i,ElemType e) // 算法 2.4 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 ,1<<i<ListLength(L)+1 


// 操作 结果 : 在 工 中 第 i 个 位 置 之 前 插入 新 的 数据 元 素 e, 工 的 长 度 加 1( 见 图 2-6) 


[也 =~[1 oo 
10 2 |0] 
10 3 
L | 4 

5 

6 

8 
| 9_|[8] 
Lo JB] 


(a)L 调 用 函数 之 前 的 状态 


ElemType * newbase, * q, * p; 


[也 =[1L 0 | 
10 2 | [1] 可 2 |[U 
12 3 12 3 
L | 4 | L | 4 

5 [5 | 
6 [6 
Ea 本 | 
8 [7 
9 [8 | 
p 一 | 0 上 9? 
(最 初 位置 ) [10] L000] 


[1] 


Lj 


(b)L 增 加 存储 容量 、 移 动 元 素 (ce) Li 调用 函数 之 后 的 状态 
图 2-6 调用 ListInsertO) 示 例 (i=7,e=11) 


if(i 过 1||i>L. length+1) // i 值 不 合法 


return ERROR; 


if(L. length == L. listsize) // 当前 存储 空间 已 满 ,增加 分 配 , 修 改 
{ newbase = (ElemType * )realloc(L. elem,(L. listsize+ LIST INCREMENT) * sizeof (ElemType)); 


if( 1newbase) // 存储 分 配 失 败 


exit(OVERFLOW) ; 
L. elem = newbase; // 新 基 址 赋 给 L. elem 
L. listsize += LIST_INCREMENT; // 增加 存储 容量 


} 


q=L.elem+i-1; // q 为 插入 位 置 
for(p= L.elem+L.length- 1;p 盖 =q; 一 p) // 插入 位 置 及 之 后 的 元 素 右 移 ( 由 表 尾 元 素 开始 移 ) 


x* (p+1)=xp; 
*q=ei // 插入 e 


++ 工 . length; // 表 长 增 1 
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return OK; 
} 
Status ListDelete(SqList &L,int i,ElemType &e) // 算法 2.5 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 ,1<i<ListLength(L) 
// 操作 结果 : 删除 工 的 第 i 个 数据 元 素 ,并 用 e 返回 其 值 .L 的 长 度 减 1( 见 图 2-7) 


十 =~| 1 |[0] [了 二 =|[1]o =| 1 |[0] 
zl [Lu 2 | [ 10 了 外 [ 林 
12 3 Lz 3 12 3 
4 L [4 | L | 4 
5 返回 参数 : | 5 | [5 
6 e=7 6|. 1.6|: 
p 一 | 7 | 8 
8 (最 初 位 置 ) |_ 8 [9 | 
9 9 0 
10 10 [1 | 
11 [10] q—=|117 [10] [11 | [10] 
[1] [11] [11] 
(a) L 调 用 函数 之 前 的 状态 (b) L 移 动 元 素 (c)L 调 用 函数 之 后 的 状态 


图 2-7 调用 ListDelete() 示 例 (i 一 7) 


ElemType * p, *q; 
if(i 二 1||i>L. length) // i 值 不 合法 
return ERROR; 
p=L.elem+i-1; // Pp 为 被 删除 元 素 的 位 置 
e=*p; // 被 删除 元 素 的 值 赋 给 e 
q=L.elemn+L.length-1; // 9 为 表 尾 元 素 的 位 置 
for( ++ p;p 一 = qi++ p) // 被 删除 元 素 之 后 的 元 素 左 移 (由 被 删除 元 素 的 后 继 元 素 开 始 移 ) 
ee 
L. length--; // 表 长 减 1 
return OK; 
} 
void ListTraverse(SqList L,void(% visit) (ElemType&)) 
{ // 初始 条 件 : 顺序 线性 表 工 已 存在 
// 操作 结果 : 依次 对 工 的 每 个 数据 元 素 调用 函数 visit() 


WA visit() 的 形 参 加 发 ', 表 明 可 通过 调用 visit() 改 变 元 素 的 值 
ElemType * p= L.elem; // p 指 向 第 1 个 元 素 
int i; 


for(i=1;i<=L.length;i++) // 从 表 工 的 第 1 个 元 素 到 最 后 1 个 元 素 
visit( xp++ ); // 对 每 个 数据 元 素 调 用 visit() 
printf("\n"); 

} 

在 bo2-1. cpp 中 ,基本 操作 函数 ListTraverse() 还 要 调用 visit() 函 数 , 并 将 visit() 函 数 
设 为 ListTraverse() 的 形 参 。 把 函数 visit() 作 为 形 参 的 原因 ,是 要 在 ListTraverse() 中 根据 
情况 调用 不 同 的 函数 而 不 是 一 个 固定 的 函数 。 从 作为 形 参 的 visit() 函 数 得 知 ,满足 哪些 条 
件 的 函数 可 以 被 ListTraverse() 函 数 调用 。 在 函数 类 形 参 的 声明 中 指定 了 visit() 的 函数 类 
型 ,也 就 是 函数 返回 值 的 类 型 (void)。 在 声明 中 还 指定 了 visit() 函 数 形 参 的 个 数 (1 个 ) 和 
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类 型 (ElemType 的 引用 类 型 )。 所 有 满足 条 件 的 函数 (返回 值 为 void 类 型 ,有 一 个 形 参 , 且 
类 型 为 ElemType&) ,都 可 以 作为 ListTraverse() 函 数 的 实 参 。 

LocateElem() 函 数 也 要 调用 一 类 函数 compare()。 由 LocateElem() 函数 的 声明 可 以 看 
出 : 要 求 这 类 函数 具有 2 个 形 参 ,其 类 型 均 为 ElemType; 函数 的 返回 值 为 Status 类 型 。 不 
仅 如 此 ,根据 LocateElem() 函 数 的 说 明 ( 初 始 条 件 ), 当 compare() 函 数 的 2 个 形 参 满足 给 定 
条 件 时 ,返回 值 为 1 ,否则 为 0。 只 有 满足 这 种 条 件 的 函数 才能 作为 蔡 代 compare() 函数 的 
实 参 函数 。 

func2-2. cpp 是 一 些 常 用 的 函数 。main2-1. cpp 是 检验 bo2-1. cpp 中 的 各 基本 操作 函数 
是 否 正确 的 主 函数 。 其 中 ,sq( 〇 函数 满足 LocateElem() 函 数 对 函数 类 形 参 compare() 的 要 
求 ,可 以 作为 LocateElem() 的 调用 函数 ; dbl() 函数 满足 ListTraverse() 函数 对 函数 类 形 参 
visit() 的 要 求 ,可 以 作为 ListTraverse() 的 调用 函数 。func2-2. cpp 中 ,print1() 函 数 只 是 向 
屏幕 输出 形 参 c, 并 不 改变 形 参 c, 所 以 形 参 不 需要 是 引用 类 型 ,但 为 了 和 ListTraverse( ) 函 
数 的 要 求 一 致 ,其 形 参 被 定义 为 引用 类 型 。ListTraverse() 函 数 之 所 以 要 求 visit() 的 形 参 
为 引用 类 型 ,是 因为 另 一 个 实 参 函数 dbl() 是 给 形 参 的 值 加 倍 , 且 要 将 形 参 值 的 改变 带 回 主 
调 函 数 , 故 必须 是 引用 类 型 。 

// func2-2.cpp 几 个 常用 的 函数 

Status equal(ElemType c1,ElenType c2) 

{ // 判断 是 否 相 等 的 函数 

if(cl == c2) 
return TRUE ; 


else 
return FALSE; 
} 
int comp( ElemType a,ElemType b) 
{ // 根据 a 二 、= 或 >>b, 分 别 返 回 -1.0 或 1 


if(a== b) 
return 0; 
else 


return (a— b)/abs(a— b); 

: 

void print(ElemType c) 

{ // 以 十 进 制 整 型 的 格式 输出 元 素 的 值 
printf("%d",c); 

} 

void print1(ElemType &c) 

{ // 以 十 进 制 整 型 的 格式 输出 元 素 的 值 ( 设 c 为 引用 类 型 ) 
printf("%d",c); 

} 

void print2(ElemType c) 

{ // 以 字符 型 的 格式 输出 元 素 的 值 
printf("%c",c); 

} 
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// main2-1. cpp 检验 bo2-1.cpp 的 主 程序 

间 include"c1.h" 

typedef int ElemType; // 定义 ElemType 为 整 型 

间 include"c2-1.h" // 线性 表 的 顺序 存储 结构 

# include"bo2-1.cpp"”// 线性 表 顺 序 存储 结构 的 基本 操作 

# include"func2-2. cpp" // 包括 equal() .comp() .print() .print1() 和 print2() 函 数 
Status sq(ElemType cl1.ElemType c2) 

{ // 数据 元 素 判 定 函 数 (平方 关系 ),LocateElem( ) 调 用 的 函数 


} 


让 (cl == c2# c2) 
return TRUE; 
else 
return FRLSE; 


void dbl(ElenType &c) 
{ // ListTraverse() 调 用 的 另 一 函数 (元 素 值 加 售 ) 


} 


CH =25 


void main( ) 


{ 


SqList L; 
ElemType e,e0; 
Status i; 
int j,k; 
InitList(L); // 初始 化 线性 表 工 
printf(" 初 始 化 工 后 ,L. length=%d,L. listsize=%d,L. elem=%u\n",L. length, 
L. listsize,L. elem); 
for(j=1;j<=5;j++) 

i=ListInsert(L,1,j); // 在 工 的 表 头 插入 j 
printf(" 在 工 的 表 头 依次 插入 1 一 5 后 , x L. elem="); 
for(j=1;j<=5;j++) 

printf("%d",x*(L.elem+j-1)); // 依次 输出 表 工 中 的 元 素 
printf("\n 调用 ListTraverse() 函 数 , 依 次 输出 表 工 中 的 元 素 : "); 
ListTraverse(L,print1); // 依次 对 表 工 中 的 元 素 调 用 print1() 函 数 ( 输 出 元 素 的 值 ) 
i=ListEmpty(L); // 检测 表 工 是 否 空 
printf("L. length=%d( 改 变 ) ,L. listsize =%d( 不 变 ),",L. length,L. listsize); 
printf("L. elem = 名 u( 不 变 ) ,LL 是 否 空 ”了 i=%d(1: 是 0: 否 )\n",L. elem,i); 
ClearList(L); // 清空 表 工 
i= ListEmpty(L); // 再 次 检测 表 工 是 否 空 
printf(" 清 空 L 后 ,L. length=%d,L. listsize=%d,",L. length,L. listsize); 
printf("L.elem=$%u' 是 否 空 ? i=%d(1: 是 0: 否 )\n",L.elem.i); 
for(j=1;j<==10;j++) 

ListInsert(L,j,j); // 在 工 的 表 尾 插入 j 
printf(" 在 工 的 表 尾 依次 插入 1~10 后 .L="); 
ListTraverse(L,print1); // 依次 输出 表 工 中 的 元 素 
printf("L. length=%d,L. listsize =%d,L. elem=$%u\n" .L. length,L. listsize,L. elem); 


ListInsert(L,1,0); // 在 工 的 表 头 插入 0, 增加 存储 空间 
printf(" 在 工 的 表 头 插入 0 后 ,L. length=%d( 改 变 ) ,L. listsize=%d( 改 变 )," 
"L.elem=%Su( 有 可 能 改变 )\n",L. length,L. listsize,L. elem); 
GetElem(L,5,e); // 将 表 工 中 的 第 5 个 元 素 的 值 赋 给 e 
printf(" 第 5 个 元 素 的 值 为 %d\n" ,e); 
for(j=10;j<=11;j++) 
{ k= LocateElem(L,j,equal); // 查找 表 工 中 与 j 相 等 的 元 素 , 并 将 其 位 序 赋 给 k 
if(k) // k 不 为 0, 表明 有 符合 条 件 的 元 素 
printf(" 第 sd 个 元 素 的 值 为 sd,",k,j); 
else // k 为 0, 没有 符合 条 件 的 元 素 
printf(" 没 有 值 为 %d 的 元 素 \n" ,j); 
} 
for(j=3;j 一 =4;j++ ) // 测试 2 个 数据 
{ k= LocateElem(L,j,sq); // 查找 表 工 中 与 j 的 平方 相等 的 元 素 ,并 将 其 位 序 赋 给 k 
if(k) // k 不 为 0 表明 有 符合 条 件 的 元 素 
printf(" 第 %d 个 元 素 的 值 为 %d 的 平方 ," ,k,j); 
else //k 为 0, 没 有 符合 条 件 的 元 素 
printf(" 没 有 值 为 %d 的 平方 的 元 素 \n" ,j); 
} 
for(j=1;j 一 = 2;j++ ) // 测试 头 2 个 数据 
GetElem(L,j,e0); // 将 表 工 中 的 第 j 个 元 素 的 值 赋 给 e0 
i= PriorElem(L,e0,e); // 求 e0 的 前 驱 , 如 成 功 ,将 值 赋 给 e 
if(i == ERROR) // 操作 失败 
printf(" 元 素 %d 无 前 驱 ,",e0); 
else // 操作 成 功 
printf(" 元 素 $d 的 前 驱 为 %d\n",e0,e); 
} 
for(j=ListLength(L) - 1;j 一 = ListLength(L);j++ ) // 最 后 2 个 数据 
GetElem(L,j,e0); // 将 表 工 中 的 第 j 个 元 素 的 值 赋 给 e0 
i= NextElem(L,e0,e); // 求 e0 的 后 继 , 如 成 功 ,将 值 赋 给 e 
if(i == ERROR) // 操作 失败 
printf(" 元 素 $d 无 后 继 \n" ,e0); 
else // 操作 成 功 
printf(" 元 素 %d 的 后 继 为 %d,".e0,e); 
} 
k= ListLength(L); // k 为 表 长 
for(j=k+13j 之 =k3j 一 ) 
{ 二 =ListDelete(L,j,e); // 删除 第 j 个 数据 
if(i == ERROR) // 表 中 不 存在 第 j 个 数据 
printf(" 删 除 第 %d 个 元 素 失败 。 ,j); 
else // 表 中 存在 第 j 个 数据 ,删除 成 功 ,其 值 赋 给 e 
printf(" 删 除 第 sd 个 元 素 成 功 ,其 值 为 sd" ,je); 


} 
ListTraverse(L,dbl); // 依次 对 元 素 调用 db1() ,元 素 值 乘 2 
printf("L 的 元 素 值 加 倍 后 ,= "); 
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ListTraverse(L,print1); // 依次 输出 表 工 中 的 元 素 

DestroyList(L); // 销毁 表 工 

printf(" 销 毁 工 后 ,L. length=%d,L. listsize=%d,L. elem=%u\n",L. length, 
L.listsize,L. elem); 


} 
程序 运行 结果 (其 中 指针 变量 的 值 在 不 同 的 编译 环境 下 会 不 同 ) : 


初始 化 工 后 ,L. length = 0,L. listsize= 10,L.elem = 2668 

在 工 的 表 头 依次 插入 1~5 后 ,*L.elem=54321 

调用 ListTraverse() 函 数 ,依次 输出 表 工 中 的 元 素 : 54321 

L. length = 5( 改 变 ) ,L. listsize = 10( 不 变 ) ,L. elem = 2668( 不 变 ) , 工 是 否 空 ”i=0(1: 是 0: 否 ) 
清空 工 后 ,L. length= 0,L. listsize = 10,L.elem= 2668, 是 否 空 ? i=1(1: 是 0: 否 ) 

在 工 的 表 尾 依次 插入 1~10 后 ,L=12345678910 

L. length = 10,L. listsize= 10,L. elem = 2668 

在 工 的 表 头 插入 0 后 ,L.1length= 11( 改 变 ) ,L. listsize = 12( 改 变 ) ,L.elem = 2692( 有 可 能 改变 ) 
第 5 个 元 素 的 值 为 4 

第 11 个 元 素 的 值 为 10, 没 有 值 为 11 的 元 素 

第 10 个 元 素 的 值 为 3 的 平方 ,没有 值 为 4 的 平方 的 元 素 

元 素 0 无 前 驱 ,元 素 1 的 前 驱 为 0 

元 素 9 的 后 继 为 10 ,元 素 10 无 后 继 

删除 第 12 个 元 素 失败 。 删 除 第 11 个 元 素 成 功 ,其 值 为 10 

I 的 元 素 值 加 倍 后 ,.L=024681012141618 

销毁 工 后 ,L. length= 0,L. listsize=0,L.elem=0 


algo2-1. cpp 是 采用 线性 表 的 动态 分 配 顺 序 存 储 结构 (c2-1. h) 调 用 算法 2. 7 的 程序 ,其 
中 包含 了 c2-1. h 存储 结构 文件 和 bo2-1. cpp 基本 操作 函数 文件 。 


// algo2-1. cpp 实现 算法 2.7 的 程序 
间 include"ci.h" 
typedef int ElemType; // 定义 ElemType 为 整 型 
间 include"c2-1.h" // 线性 表 的 顺序 存储 结构 
# include"bo2-1.cpp”// 线性 表 顺 序 存储 结构 的 基本 操作 
include"func2-2.cpp" // 包括 equal() .comp() .print() .print1() 和 print2() 困 数 
void MergeList(SqList La,SqList Lb,SqList &Lc) // 算法 2.7 
{ // 已 知 顺序 线性 表 La 和 Lb 的 元 素 按 值 非 递减 排列 。 
// 归并 La 和 Lb 得 到 新 的 顺序 线性 表 Le,Lc 的 元 素 也 按 值 非 递减 排列 (不 改变 表 La 和 表 Lb) 
ElemType * pa, * pa_last, * pb, * pb last. * pc; 
pa= La.elem; // pa 指向 表 La 的 第 1 个 元 素 
pb = Lb.elem; // pb 指向 表 Lb 的 第 1 个 元 素 
Lc. listsize= Lc. length = La. length+Lb. length; // 不 用 InitList() 创 建 空 表 Lc 
pc=Lc.elem= (ElemType * )malloc(Lc. listsize * sizeof(ElemType)); // 分 配 所 需 空间 
if(1Lc. elem) // 存储 分 配 失败 
exit(OVERFLOW) ; 
pa_last = La. elem+ La. length- 1; // pa_last 指向 表 La 的 最 后 1 个 元 素 
pb_last = Lb.elem+ Lb.length-1; // pb_last 指向 表 Lb 的 最 后 1 个 元 素 
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while(pa 一 = pa_last&&pb 一 = pb_last) // 表 La 和 表 Lb 均 有 元 素 没 有 归并 
{ // 归并 
if( x pa<=* pb) // 表 Ia 的 当前 元 素 不 大 于 表 Lb 的 当前 元 素 
* pc ++=x* pa++; // 将 pa 所 指 单元 的 值 赋 给 pc 所 指 单元 后 ,pa 和 pc 分 别 +1 
else 
* pc ++=x pb++i // 将 pb 所 指 单 元 的 值 赋 给 pc 所 指 单元 后 ,pb 和 pc 分 别 + 1 
} // 以 下 两 个 while 循环 只 会 有 一 个 被 执行 
while(pa 一 = pa_last) // 表 Lb 中 的 元 素 全 都 归并 
* pc ++=x pa++; // 插入 La 的 剩余 元 素 
while(pb 一 = pb_last) // 表 La 中 的 元 素 全 都 归并 
* pc ++=x pb++; // 插入 Lb 的 剩余 元 素 
} 
void main( ) 
{ 
SqList La,Lb,Lc; 
int j; 
InitList(La); // 创建 空 表 La 
for(j=1;j<=5;j++)// 在 表 La 中 插入 5 个 元 素 , 依 次 为 1.2、3、4、5( 见 图 2-8) 
ListInsert(La,j,j); 
printft("La= "); // 输出 表 La 的 内 容 
ListTraverse(La,print1); 
InitList(Lb); // 创建 空 表 Lb 
for(j=1;j<<=5;j++)// 在 表 Lb 中 插入 5 个 元 素 , 依 次 为 2.4、6.8、10( 见 图 2-9) 
ListInsert(Lb,j,2*j); 
printf("Lb= "); // 输出 表 Lb 的 内 容 
ListTraverse(Lb,print1); 
MergeList(La,Lb,Lc); // 由 按 非 递减 排列 的 表 La、Lb 得 到 按 非 递减 排列 的 表 Lc 
printf("Lc= "); // 输出 表 Lc 的 内 容 ( 见 图 2-10) 
ListTraverse(Lc,print1); 


[也 =~| 1 Em [0] [也 =[1]mo 
5 2 |[1] 5 4 | 0] 10 2 |[1] 
10 3 10 | 6 10 2 
La | 4 Lb 8 Le 3 
S|:: 10 4 
| | 4 | 
[Ea | [5 | 
| | 6 
| |[8] [8] 8 _| [8] 
[| 中 [9] 10 | [9] 
图 2-8 表 La 图 2-9 表 Lb 图 2-10 表 Le 
程序 运行 结果 : 
La= 12345 


Lb= 246810 
LIc= 12234456810 
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23 线性 表 的 链 式 表示 和 实现 


和 顺序 表 相 比 , 链 表 存 储 结构 在 实现 插入 、 删 除 的 操作 时 ,不 需要 移动 大 量 数据 元 素 ( 但 
不 容易 实现 随机 存 取 线性 表 的 第 i 个 数据 元 素 的 操作 )。 所 以 ,链表 适用 于 经 常 需要 进行 插 
入 和 删除 操作 的 线性 表 , 如 飞机 航班 的 乘客 表 等 。 


23.1 线性 链表 


// c2-2.h 线性 表 的 单 链表 存储 结构 。 在 教科 书 第 28 页 ( 见 图 2-11) 
struct LNode LinkList LNode LNode 
Wty Cl 一- 
LNode x*next; 
)， 图 2-11 线性 表 的 单 链 表 存 储 结 构 
typedef LNode x LinkList; // 另 一 种 定义 LinkList 的 方法 
图 2-12 是 根据 c2-2. h 定义 的 带 有 头 结 点 且 具 有 2 个 结 点 (4,7) 的 线性 链表 的 结构 。 
bo2-2. cpp 是 这 种 带 有 头 结 点 的 线性 链表 的 基本 操作 。 
-~ ~[L 4 二 [7 Nu 
头 指针 头 结 点 首 元 结 点 尾 元 结 点 
图 2-12 带 有 头 结 点 且 具 有 2 个 结 点 (4,7) 的 线性 链表 


// bo2-2. cpp 带 有 头 结 点 的 单 链表 (存储 结构 由 c2-2.h 定义 ) 的 基本 操作 (12 个 )， 
// 包括 算法 2.8 一 算法 2.10 
void InitList(LinkList &L) 
{ // 操作 结果 : 构造 一 个 空 的 线性 表 工 ( 见 图 2-13) 
L= (LinkList)malloc(sizeof(LNode)); // 产生 头 结 点 ,并 使 工 指向 此 头 结 点 


i£(1L) // 存储 分 配 失败 J- 


exit(OVERFLOW) ; L 


->next = NULL; // 头 结 点 的 指针 域 为 空 入 
) 图 2-13 空 ( 仅 有 头 结 点 ) 的 单 链 表 工 


void DestroyList(LinkList &L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 销毁 线性 表 工 ( 见 图 2-14) 


LinkList q; 
while(L) // 工 指向 结 点 ( 非 空 7 
{ q=L- 二 next; // q 指 向 首 元 结 点 NULL 
free(L); // 释放 头 结 点 b 
L=q; // 工 指向 原 首 元 结 点 , 现 头 结 点 图 2-14 线性 表 工 被 销毁 


} 
} 
void ClearList(LinkList L) // 不 改变 工 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 将 工 重 置 为 空 表 ( 见 图 2-13) 
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LinkList p= 工 ->next; // p 指向 第 1 个 结 点 
L->next= NULL; // 头 结 点 指针 域 为 空 
DestroyList(p); // 销毁 p 所 指 的 单 链表 
} 
Status ListEmpty(LinkList L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 若 工 为 空 表 , 则 返回 TRUE, 和 否则 返回 FALSE 
if(L ->>next) // 非 空 
return FALSE; 
else 
return TRUE; 
} 
int ListLength(LinkList L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 返回 工 中 数据 元 素 的 个 数 
int i=0; // 计数 器 初 值 为 0 
LinkList p=L-next; // p 指 向 第 1 个 结 点 
while(p) // 未 到 表 尾 
{+4+; // 计数 器 +1 
p=p- 二 next; // p 指 向 下 一 个 结 点 
} 
return i; 
} 
Status GetElem(LinkList L,int i,ElemType &e) // 算法 2.8 
{ // 工 为 带头 结 点 的 单 链表 的 头 指针 。 当 第 i 个 元 素 存 在 时 ,其 值 赋 给 e 并 返回 OK; 否则 返回 ERROR 
int j=1; // 计数 器 初 值 为 1 
LinkList p = 工 -二 next; // p 指向 第 1 个 结 点 
while(p&&j 二 i) // 顺 指针 向 后 查找 ,直到 p 指向 第 并 个 结 点 或 p 为 空 (第 并 个 结 点 不 存在 ) 
{ jj++; // 计数 器 +1 
p=p->next; // p 指 向 下 一 个 结 点 
} 
if(1p|1j 之 ) // 第 i 个 结 点 不 存在 
return ERROR; 
e=p->data; // 取 第 i 个 元 素 的 值 赋 给 。 
return OK; 
} 
int LocateElem(LinkList L,ElemType e,Status(# compare) (ElemType .ElemType)) 
{ // 初始 条 件 : 线性 表 工 已 存在 ,compare() 是 数据 元 素 判 定 函 数 (满足 为 1, 否 则 为 0) 
// 操作 结果 : 返回 工 中 第 1 个 与 e 满 足 关系 compare( ) 的 数据 元 素 的 位 序 。 
AH 若 这 样 的 数据 元 素 不 存在 , 则 返回 值 为 0 
int i= 0; // 计数 器 初 值 为 0 
LinkList p= 工 - 盖 next; // p 指 向 第 1 个 结 点 
while(p) // 未 到 表 尾 
{ 主 村 ; // 计数 器 +1 
证 (compare(p -data,e)) // 找到 这 样 的 数据 元 素 
return i; // 返回 其 位 序 
p=p -二 next; // p 指 向 下 一 个 结 点 
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} 
return 0; // 满足 关系 的 数据 元 素 不 存在 
} 
Status PriorElem(LinkList L,ElemType cur e,ElemType &pre e) 
{ // 初始 条 件 : 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 第 一 个 , 则 用 pre_e 返回 它 的 前 驱 ,返回 0K， 
// 否则 操作 失败 ,pre_e 无 定义 ,返回 ERROR 
LinkList q,p = 工 ->next; // p 指 向 第 1 个 结 点 
while(p 一 next) // p 所 指 结 点 有 后 继 
{ q=p->next; // q 指 向 p 的 后 继 
证 (q- 二 data== cur_e) // p 的 后 继 为 cur_e 
{ pre_e=p-data; // 将 p 所 指 元 素 的 值 赋 给 pre_e 
return OK; // 成 功 返回 OK 
} 
p= q; // Pp 的 后 继 不 为 cur_e,p 向 后 移 
} 
return ERROR; // 操作 失败 ,返回 ERROR 
} 
Status NextElem(LinkList L,ElemType cur e,ElemType &next e) 
{ // 初始 条 件 : 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 最 后 一 个 , 则 用 next_e 返回 它 的 后 继 ,返回 Ok， 
// 否则 操作 失败 ,next_e 无 定义 ,返回 ERROR 
LinkList p=L- 二 next; // p 指 向 第 1 个 结 点 
while(p -二 next) // p 所 指 结 点 有 后 继 
{ 赴 (p- 二 data== cur_e) // p 所 指 结 点 的 值 为 cur_e 
{ next_e=p-next -data; // 将 p 所 指 结 点 的 后 继 结 点 的 值 赋 给 next_e 
return OK; // 成 功 返 回 OK 
} 
p=p->next; // p 指 向 下 一 个 结 点 
} 


return ERROR; // 操作 失败 ,返回 ERROR 


1 
上 


Status ListInsert(LinkList L,int i,ElemType e) // 算法 2.9 。 不 改变 工 
{ // 在 带头 结 点 的 单 链 线性 表 工 中 第 i 个 位 置 之 前 插入 元 素 e( 见 图 2-15) 
int j= 0; // 计数 器 初 值 为 0 
LinkList s,p=L; // p 指 向 头 结 点 
while(p&&j 一 i- 1) // 寻找 第 i-1 个 结 点 
{ j++;i // 计数 器 +1 
p=p->next; // p 指 向 下 一 个 结 点 
} 
if(1p|1j 记 i-1) // i 小 于 1 或 者 大 于 表 长 
return ERROR; // 插入 失败 
s= (LinkList)malloc(sizeof(LNode)); // 生成 新 结 点 ,以 下 将 其 插入 工 中 
s- 二 data= e; // 将 e 赋 给 新 结 点 
s->next=p->next; // 新 结 点 指向 原 第 i 个 结 点 


和 ee 


i-l i 


(a) 初 态 , p 指 向 头 结 点 
P 


| 
L 一 -天 于 -LT 车- | = | 本 


1 i-1 i 
(b) p 指 向 第 i-1 个 结 点 


L—| | | + a 7 [Es 


(0) 在 第 i 个 结 点 之 前 插入 值 为 的 结 点 
图 2-15 在 链表 L 的 第 i 个 位 置 之 前 插入 元 素 e 
p -next = s; // 原 第 i- 1 个 结 点 指向 新 结 点 
return OK; // 插入 成 功 
} 


Status ListDelete(LinkList L,int i,ElemType &e) // 算法 2.10 。 不 改变 工 
{ // 在 带头 结 点 的 单 链 线性 表 工 中 ,删除 第 i 个 元 素 , 并 由 e 返 回 其 值 ( 见 图 2-16) 


ps | -| | 才 一 … 


1 | i itl 


(a) 初 态 , p 指 向 头 结 点 
p 


一 国 半 04- 一 [了 -0 


1 i-l i 计 1 
(b) p 指 向 第 i-1 个 结 点 
p 


-一 -大 了 -| 本 


1 -1 i it 


(©) 从 链表 中 删除 第 i 个 结 点 
图 2-16 删除 链表 L 的 第 i 个 结 点 


int j= 0; // 计数 器 初 值 为 0 
LinkList qyp=L; // p 指 向 头 结 点 
while(p ->next&&j<i-1) // 寻找 第 i 个 结 点 .并 令 p 指 向 其 前 驱 
{ jx++; // 计数 器 +1 
p=p->next; // p 指 向 下 一 个 结 点 
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} 
证 (!p->next||j>i- 1) // 删除 位 置 不 合理 
return ERROR; // 删除 失败 
q=p->next; // q 指 向 待 删除 结 点 
p -next = q -next; // 待 删 结 点 的 前 驱 指向 待 删 结 点 的 后 继 
e=q->datai // 将 待 删 结 点 的 值 赋 给 e 
free(q); // 释放 待 删 结 点 
return OK; // 删除 成 功 
} 
void ListTraverse(LinkList L,void(% visit)(ElemType)) 
// visit 的 形 参 类 型 为 ElemType, 与 bo2-1.cpp 中 相应 函数 的 形 参 类 型 ElemTypeg 不 同 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 依次 对 工 的 每 个 数据 元 素 调用 函数 visit() 
LinkList p=L-next; // p 指 向 第 1 个 结 点 
while(p) // p 所 指 结 点 存在 
{ visit(P- 二 data); // 对 p 所 指 结 点 调用 函数 visit() 
p=p->next; // p 指 向 下 一 个 结 点 
} 
printf("\n"); 
} 


main2-2. cpp 是 验证 基本 操作 bo2-2. cpp 的 主 程序 。 为 了 后 面 的 复 用 , 主 函 数 放 在 
func2-3. cpp 中 。 注 意 到 bo2-2. cpp 中 的 ListTraverse() 函数 的 形 参 visit() 函 数 的 形 参 类 型 
是 ElemType, 不 是 引用 类 型 ElemType & ,这 与 bo2-1. cpp 中 的 ListTraverse() 函 数 不 同 。 
因此 在 主 程序 中 替代 visitO 〇 的 实 参 函数 print() 的 形 参 类 型 也 是 ElemType 。 由 于 bo2-2. cpp 和 
bo2-1. cpp 都 是 12 个 函数 名 、 操 作 结 果 均 相同 的 基本 操作 函数 , 仅 变量 类 型 .实现 过 程 不 
同 ,而 验证 基本 操作 的 主 程序 main2-1. cpp 和 main2-2. cpp 的 作用 又 基本 相同 ,所 以 程序 
func2-3. cpp 和 程序 main2-1. cpp 中 的 主 函数 很 相像 。 


// func2-3. cpp 检验 单 链表 基本 操作 的 主 函 数 
// main2-2. cpp ,main2-3. cpp main2-4.cpp 和 main2-5.cpp 调用 
void main() 
{ 
LinkList L; // 与 main2-1.cpp 不同 
ElemType e,e0; 
Status i; 
int j,k; 
InitList(L); // 初始 化 线性 表 工 
for(j=1;j<=5;j++) 
i=ListInsert(L,1,j); // 在 工 的 表 头 插入 j 
printf(" 在 工 的 表 头 依次 插入 1~5 后 ,L="); 
ListTraverse(L,print); // 依次 对 元 素 调用 print() ,输出 元 素 的 值 
i= ListEmpty(L); // 检测 表 工 是 否 空 
printf("L 是否 空 ? i=%d(1: 是 0: 否 ), 表 工 的 长 度 =%d\n",i,ListLength(L)); 
ClearList(L); // 清空 表 工 
printf(" 清 空 工 后 ,L="); 
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ListTraverse(L,print); 
i=ListEmpty(L); // 再 次 检测 表 工 是 否 空 
printf("L 是 否 空 ? i=%d(1: 是 0: 否 ), 表 工 的 长 度 =%d\n",i,ListLength(L)); 
for(j=1;j<=10;j++) 
ListInsert(L,j,j); // 在 工 的 表 尾 插入 上 j 
printf(" 在 工 的 表 尾 依次 插入 1~10 后 ,L="); 
ListTraverse(L,print); // 依次 输出 表 工 中 的 元 素 
for(j=0;j<=1;j++) 
{ 
间 ifdef SLL // 仅 用 于 静态 链表 
k= LocateElem(L,j); // 查找 表 工 中 与 j 相 等 的 元 素 ,并 将 其 位 序 赋 给 k 
if(k) // kk 不 为 0, 表明 有 符合 条 件 的 元 素 
printf(" 值 为 %d 的 元 素 的 位 序 为 $d\n" ,j,k); 
间 else // 仅 用 于 链表 
k= LocateElem(L,j,equal); // 查找 表 工 中 与 j 相等 的 元 素 ,并 将 其 在 链表 中 的 排序 赋 给 k 
if(k) // kk 不 为 0, 表明 有 符合 条 件 的 元 素 
printf(" 第 %d 个 元素 的 值 为 %d\n" .k,j); 
间 endif 
else // kk 为 0, 没 有 符合 条 件 的 元 素 
printf(" 没 有 值 为 %d 的 元 素 ,",j); 
} 
for(j=1;j 一 =2;j++ ) // 测试 头 2 个 数据 
GetElem(L,j,e0); // 把 表 工 中 的 第 j 个 数据 赋 给 e0 
i= PriorElem(L,e0,e); // 求 e0 的 前 驱 , 如 成 功 ,将 值 赋 给 e 
if(i == ERROR) // 操作 失败 
printf(" 元 素 %d 无 前 驱 ,",e0); 
else // 操作 成 功 
printf(" 元 素 %d 的 前 驱 为 %d\n",e0,e); 
} 
for(j = ListLength(L) - 1;j 一 = ListLength(L);j++ ) // 最 后 2 个 数据 
GetElem(L,j,e0); // 把 表 工 中 的 第 j 个 数据 赋 给 e0 
i= NextElem(L,e0,e); // 求 e0 的 后 继 , 如 成 功 ,将 值 赋 给 e 
if(i == ERROR) // 操作 失败 
printf(" 元 素 %d 无 后 继 \n" ,e0); 
else // 操作 成 功 
printf(" 元 素 %d 的 后 继 为 %d,",e0,e); 


} 
k= ListLength(L); // k 为 表 长 
for(j=k+1;j>=k;j—) 
{ =ListDelete(L,j,e); // 删除 第 j 个 数据 
if(i == ERROR) // 表 中 不 存在 第 j 个 数据 
printf(" 删 除 第 %d 个 元 素 失败 (不 存在 此 元 素 )。",j); 
else // 表 中 存在 第 j 个 数据 .删除 成 功 .其 值 赋 给 e 
printf(" 删 除 第 %d 个 元 素 成 功 ,其 值 为 $d\n" .j.e); 
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printf(" 依 次 输出 工 的 元 素 : "); 
ListTraverse(L,print); // 依次 输出 表 工 中 的 元 素 
DestroyList(L); // 销毁 表 工 

间 ifndef SLL // 仅 用 于 链表 
printf(" 销 毁 工 后 .=gsuNxn",L); 

间 endif 

} 


// main2-2.cpp 检验 bo2-2.cpp 的 主 程序 

间 include"c1.h" 

typedef int ElemType; // 定义 ElemType 为 整 型 

并 include"c2-2.h" // 线性 表 的 单 链表 存储 结构 

间 include"bo2-2.cpp" // 设 有 头 结 点 单 链表 存储 结构 的 基本 操作 

间 include"func2-2.cpp" // 包括 equal() .comp() 、print()、print1() 和 print2() 隐 数 
间 include"func2-3.cpp" // 主 函 数 


程序 运行 结果 : 


在 工 的 表 头 依次 插入 1~5 后 ,L=54321 
工 是 否 空 ?i= 0(1: 是 0: 否 ), 表 工 的 长 度 =5 

清空 ZI 后 ,= 

工 是 否 空 了 i=1(1: 是 0: 否 ), 表 工 的 长 度 =0 

在 工 的 表 尾 依次 插入 1~10 后 ,L=12345678910 

没有 值 为 0 的 元 素 ,第 1 个 元 素 的 值 为 1 

元 素 1 无 前 驱 , 元 素 2 的 前 驱 为 1 

元 素 9 的 后 继 为 10, 元 素 10 无 后 继 

删除 第 11 个 元 素 失败 (不 存在 此 元 素 )。 删 除 第 10 个 元 素 成 功 , 其 值 为 10 
依次 输出 工 的 元 素 : 123456789 

销毁 工 后 ,L=0 


// algo2-2.cpp 用 SqList 类 型 和 LinkList 类 型 分 别 实现 算法 2.1 和 算法 2.2 的 程序 
间 include"c1l.h" 
typedef int ElemType; // 定义 ElemType 为 整 型 
间 define Sq // (用 SqList 类 型 选 此 行 ,用 LinkList 类 型 将 此 行 作为 注释 ) 
提 ifdef Sq 
提 include"c2-1.h" // 采用 线性 表 的 动态 分 配 顺 序 存 储 结构 
间 include"bo2-1.cpp" // 可 以 使 用 bo2-1. cpp 中 的 基本 操作 
typedef SqList List; // 定义 抽象 数据 类 型 List 为 SqList 类 型 
提 define printer print1 // ListTraverse() 用 到 不 同类 型 的 输出 函数 
# 井 else 
# include"c2-2.h"// 采用 线性 表 的 单 链表 存储 结构 
提 include"bo2-2.cpp" // 可 以 使 用 bo2-2. cpp 中 的 基本 操作 
typedef LinkList List; // 定义 抽象 数据 类 型 List 为 LinkList 类 型 
间 define printer print // ListTraverse() 用 到 不 同类 型 的 输出 函数 
间 endif 
间 include"func2-2.cpp" // 包括 equal() .comp() .print() ,print1() 和 print2() 郴 数 


第 2 章 ”线性 表 


# include"func2-1. cpp" // 包括 算法 2.1 和 算法 2.2 
void main() 
{ 
List La,Lb,Lc; 
int j,b[7]= {2,6,8,9,11,15,20); 
InitList(La); // 创建 空 表 Ta。 如 不 成 功 , 则 会 退出 程序 的 运行 
for(j=1;j<=5;j++ ) // 在 表 Ia 中 插入 5 个 元 素 , 依 次 为 1.2.3.4.5 
ListInsert(La,j,j); 
printf("La= ")s 
ListTraverse(La,printer); // 输出 表 La 的 内 容 
InitList(Lb); // 创建 空 表 Ib 
for(j=1;j 一 =5;j++ ) // 在 表 Lb 中 插入 5 个 元 素 ,依次 为 2.4.6.、8、10 
ListInsert(Lb,j,2*j); 
printf("Lb= "); 
ListTraverse(Lb,printer); // 输出 表 Lb 的 内 容 
Union(La,Lb); // 调用 算法 2.1, 将 Lb 中 满足 条 件 的 元 素 插入 La( 不 改变 Lb) 
printf("new La= "); 
ListTraverse(La,printer); // 输出 新 表 La 的 内 容 
ClearList(Lb); // 清空 表 Ib 
for(j=1;j 一 =7;j++ ) // 在 表 Ib 中 重新 依次 插入 数组 b[] 的 7 个 元 素 
ListInsert(Lb,j,b[j—1]); 
printf("Lb= "); 
ListTraverse(Lb,printer); // 输出 表 Lb 的 内 容 
MergeList(La,Lb,Lc); // 调用 算法 2.2, 生 成 新 表 Lc( 不 改变 表 La 和 表 Lb) 
printf("Le= "); 
ListTraverse(Lc,printer); // 输出 表 Lc 的 内 容 
} 


程序 运行 结果 : 


La= L2345 

Lb= 246810 

newLa= 123456810 

Lb= 2689111520 

Ic= 1223456688910111520 


algo2-2. cpp 利用 条 件 编译 ,通过 是 否定 义 了 宏 名 Sq, 选 取 “typedef SqList List;” 或 
“typedef LinkList List; ”语句 ,将 func2-1. cpp 中 的 抽象 数据 类 型 List 定义 为 SqList 类 型 
或 LinkList 类 型 ,并 且 包 含 不 同 的 存储 结构 文件 和 基于 不 同 存储 结构 的 基本 操作 函数 文 
件 。 这 样 ,就 可 以 在 线性 表 的 顺序 存储 结构 和 链 式 存储 结构 中 都 能 调用 func2-1. cpp 中 的 
Union() 和 MergeList() 函 数 了 。 

func2-1. cpp 中 的 Union() 和 MergeList() 也 数 能 用 于 不 同 存储 结构 的 原因 在 于 Union() 和 
MergeList() 函数 是 通过 调用 线性 表 的 基本 操作 (如 ListLength() 等 ) 来 完成 的 。 算 法 中 不 
包括 针对 某 种 具体 的 存储 结构 所 特有 的 变量 的 操作 。 这 类 算法 的 可 移植 性 好 ,从 一 种 存储 
结构 移植 到 另 一 种 存储 结构 仅 做 少量 修改 即 可 。 但 由 于 没有 考虑 具体 的 存储 结构 ,这 类 算 
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法 往往 不 是 最 高 效 的 。 而 算法 2. 7 的 程序 (在 algo2-1. cpp 中 ) 涉 及 顺序 存储 结构 所 特有 的 
L.length 等 变量 ,不 容易 移植 到 其 他 存储 结构 中 使 用 。 但 这 类 算法 可 以 充分 考虑 存储 结构 
的 特点 ,从 而 做 到 高 效 。 

教科 书 中 有 类 似 特 性 的 还 有 算法 4. 1 和 算法 7. 4 一 算法 7. 8 ,它们 都 是 基于 抽象 数据 类 
型 String 或 Graph 编写 的 算法 。 


// algo2-3. cpp 实现 算法 2.11 和 算法 2.12 的 程序 
间 include"c1.h" 
typedef int ElemType; // 定义 ElemType 为 整 型 
间 include"c2-2.h" // 线性 表 的 单 链表 存储 结构 
# include" bo2-2. cpp" // 设 有 头 结 点 单 链表 存储 结构 的 基本 操作 
并 include"func2-2.cpp" // 包括 equal() .comp() .print() .print1() 和 print2() 清 数 
void CreateList(LinkList &L,int n) // 算法 2.11 
{ // 首位 序 ( 结 点 插 在 表 头 ) 输 入 n 个 元 素 的 值 ,建立 带 表 头 结 点 的 单 链 线性 表 工 
int i; 
LinkList p; 
L= (LinkList)malloc(sizeof(LNode)); // 生成 头 结 点 
1->next= NULL; // 先 建立 一 个 带头 结 点 的 空 单 链表 
printf(" 请 输入 %d 个 数据 \n" ,n); 
for(i=n;i>0;-—— i) 
{ p= (LinkList)malloc(sizeof(LNode)); // 生成 新 结 点 
scanf("%d" ,&p 一 data); // 给 新 结 点 输入 元 素 值 
p-next =L->next; // 将 新 结 点 插 在 表 头 
LDL- 二 next = p; // 头 结 点 指向 新 结 点 


} 
void CreateList1(LinkList &L,int n) 
{ // 正 位 序 ( 结 点 插 在 表 尾 ) 输 入 n 个 元 素 的 值 ,建立 带 表 头 结 点 的 单 链 线性 表 工 
int i; 
LinkList p,q; 
L= (LinkList)malloc(sizeof(LNode)); // 生成 头 结 点 
L->next= NULL; // 先 建立 一 个 带头 结 点 的 空 单 链表 
q=L; // q 指 向 空 表 的 头 结 点 (相当 于 尾 结 点 ) 
printf(" 请 输入 sd 个 数据 \n" ,n); 
for(i=1;i<~=n;i++) 
{ p= (LinkList)malloc(sizeof(LNode)); // 生成 新 结 点 
scanf("%d" ,&p -二 data); // 给 新 结 点 输入 元 素 值 
q -next = p; // 将 新 结 点 插 在 表 尾 
q= q- 二 next; // q 指 向 尾 结 点 
} 
p -next = NULL; // 最 后 一 个 结 点 的 指针 域 为 空 
} 
void MergeList(LinkList La,LinkList &Lb,LinkList &Lc) // 算法 2.12 
{ // 已 知 单 链 线性 表 La 和 Lb 的 元 素 按 值 非 递减 排列 。 
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// 归并 La 和 Lb 得 到 新 的 单 链 线性 表 Le,Lc 的 元 素 也 按 值 非 递减 排列 。( 销 毁 Lb,Lc 即 新 的 La) 
LinkList pa= La->next,pb= Lb->next,pc; // pa、pb 分 别 指向 La、Lb 的 首 元 结 点 ( 待 比较 结 点 ) 
Lc=pc=La; // 用 Ia 的 头 结 点 作为 Lc 的 头 结 点 ,pc 指向 La 的 头 结 点 (Lc 的 尾 结 点 ) 
while(pa&g&pb) // La 和 Lb 中 的 元 素 都 未 比较 完 
if(pa -二 data 一 = pb- 二 data) // La 的 当前 元 素 不 大 于 Lb 的 当前 元 素 
{ pc->next=pa; // 将 pa 所 指 结 点 归并 到 Lc 中 
pc= pa; // pc 指向 表 Lc 的 最 后 一 个 结 点 
pa= pa -next; // 表 La 的 下 一 个 结 点 成 为 待 比较 结 点 
} 
else // Lb 的 当前 元 素 小 于 La 的 当前 元 素 
{ pc -next = pb; // 将 pb 所 指 结 点 归并 到 Lc 中 
pc= pb; // pc 指向 表 Lc 的 最 后 一 个 结 点 
pb = pb-next; // 表 Ib 的 下 一 个 结 点 成 为 待 比较 结 点 
} 
pc -二 next = pa? pa:pb; // 插入 剩余 段 
free(Lb); // 释放 Lb 的 头 结 点 
Lb= NULL; // Lb 不 再 指向 任何 结 点 
} 
void main( ) 
{ 
int n=5; 
LinkList La,Lb,Le; 
printf(" 按 非 递 减 顺 序 ,"); 
CreateList1(La,n); // 根据 输入 顺序 , 正 位 序 建立 线性 表 
printf("La="); 
ListTraverse(La,print); // 输出 链表 La 的 内 容 
printf(" 按 非 递 增 顺 序 ,"); 
CreateList(Lb,n); // 根据 输入 顺序 , 逆 位 序 建 立 线 性 表 
printf("Lb="); 
ListTraverse(Lb,print); // 输出 链表 Lb 的 内 容 
MergeList(La,Lb,Lc); // 按 非 递 减 顺序 归并 La 和 Lb, 得 到 新 表 Lc 
printf("Le="); 
ListTraverse(Lc,print); // 输出 链表 Lc 的 内 容 
} 


程序 运行 结果 : 

按 非 递减 顺序 ,请 输入 5 个 数据 

12237y La | 4 Nur) 
La=12237( 见 图 2-17) 图 2-17 表 La 

按 非 递增 顺序 ,请 输入 5 个 数据 

DO 一 国耻 BN 
Lb=57889( 见 图 2-18) 图 2-18 表 Lb 
Lc=1223577889( 见 图 2-19) 
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图 2-19 调用 MergeList() ,归并 表 La、Lb, 得 到 表 Le 


单 链表 也 可 以 不 设 头 结 点 ,如 图 2-20 所 示 。 显 然 , 基 于 这 种 结构 的 基本 操作 和 带 有 头 
结 点 的 线性 链表 基本 操作 是 不 同 的 。bo2-3. cpp 和 bo2-4. cpp 是 不 设 头 结 点 的 单 链表 的 基 
本 操作 。 
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头 指针 首 元 
图 2-20 不 设 头 结 点 且 具 有 2 个 结 点 (4,7) 的 线性 链表 


// bo2-3.cpp 不 设 头 结 点 的 单 链表 (存储 结构 由 c2-2.h 定义 ) 的 部 分 基本 操作 (9 个 ) 
间 define DestroyList ClearList // DestroyList() 和 ClearList() 的 操作 是 一 样 的 
void InitList(LinkList &L) 
{ // 操作 结果 : 构造 一 个 空 的 线性 表 工 ( 见 图 2-21) NULL 
L= NULL; // 指针 为 空 | 
} 图 2-21 空 的 和 被 销毁 的 线性 表 工 
void ClearList(LinkList &L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结果 : 将 工 重 置 为 空 表 ( 见 图 2-21) 
LinkList p; 
while(L) // 工 不 空 
{ p=L; // p 指 向 首 元 结 点 
L=L-next; // 工 指向 第 2 个 结 点 (新 首 元 结 点 ) 
free(p); // 释放 首 元 结 点 
} 
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Status ListEmpty(LinkList L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结果 : 若 工 为 空 表 , 则 返回 TRUE, 和 否则 返回 FALSE 
if(L) 
return FALSE; 
else 
return TRUE; 
} 
int ListLength(LinkList L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结果 : 返回 工 中 数据 元 素 的 个 数 
int i= 0; // 计数 器 初 值 为 0 
LinkList p=L; // p 指 向 第 1 个 结 点 
while(p) // p 指向 结 点 (未 到 表 尾 ) 
{ 详 村 ; // 计数 器 +1 
p=P->next; // p 指向 下 一 个 结 点 
} 


return i; 
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Status GetElem(LinkList L.int i,ElemType &e) 
{ // 工 为 不 设 头 结 点 的 单 链表 的 头 指针 。 当 第 i 个 元 素 存在 时 ,其 值 赋 给 e 并 返回 OK， 
// 否则 返回 ERROR 
int j=1; // 计数 器 初 值 为 1 
LinkList p=L; // p 指 向 第 1 个 结 点 
if(i<1) // i 值 不 合法 
return ERROR; 
while(j 一 i&&gp) // 未 到 第 i 个 元 素 , 也 未 到 表 尾 
{ j++; // 计数 器 +1 
p=p->next; // p 指 向 下 一 个 结 点 
} 
if(j == i&&p) // 存在 第 并 个 元 素 
{ e=p->data; // 取 第 个 元 素 的 值 赋 给 e 
return OK; // 成 功 返 回 OK 
} 
return ERROR; // 不 存在 第 i 个 元 素 , 失 败 返回 ERROR 
} 
int LocateElem(LinkList L,ElemType e,Status(# compare) (ElemType, ElemType) ) 
{ // 初始 条 件 : 线性 表 工 已 存在 ,compare() 是 数据 元 素 判 定 函数 (满足 为 1, 否则 为 0) 
// 操作 结果 : 返回 工 中 第 1 个 与 e 满 足 关系 compare() 的 数据 元 素 的 位 序 。 
// 若 这 样 的 数据 元 素 不 存在 , 则 返回 值 为 0 
int i= 0; // 计数 器 初 值 为 0 
LinkList p=L; // p 指 向 第 1 个 结 点 
while(p) // 未 到 表 尾 
{并 4; // 计数 器 +1 
if(compare(p -二 datave)) // 找到 这 样 的 数据 元 素 
return i; // 返回 其 位 序 
p=Pp->next; // p 指 向 下 一 个 结 点 
} 
return 0; // 满足 关系 的 数据 元 素 不 存在 
} 
Status ListInsert(LinkList &L,int i,ElemType e) 
{ // 在 不 设 头 结 点 的 单 链 线性 表 工 中 第 i 个 位 置 之 前 插入 元 素 e 
int j=1; // 计数 器 初 值 为 1 
LinkList s,p=L; // p 指 向 第 1 个 结 点 
if(i<1) // i 值 不 合法 
return ERROR; 
s= (LinkList)malloc(sizeof(LNode)); // 生成 新 结 点 ,以 下 将 其 插入 工 中 
s->data=e; // 给 s 的 data 域 赋值 
if(i==1) // 插 在 表 头 ( 见 图 2-22) 
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{ s->next =L; // 新 结 点 指向 原 第 1 个 结 点 1 本 \ 11 ji- 
L= s; // 工 指向 新 结 点 (改变 D) | 回民 

} (a) 初 态 (b) 插 在 表 头 

else 


1 // 插 在 表 的 其 余 处 ( 见 图 2-23) 图 2-22 在 链表 工 的 第 1 个 位 置 之 前 插 和 元素。 
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(a) 初 态 , p 指 向 第 1 个 结 点 (b) 在 第 i 个 结 点 之 前 插入 值 为 e 的 结 点 
图 2-23 在 链表 工 的 第 i 个 位 置 之 前 插入 元 素 e 


while(p&&j 一 i- 1) // 寻找 第 i-1 个 结 点 
{ ++i // 计数 器 +1 
p=Pp->next; // p 指 向 下 一 个 结 点 
} 
450CIBpY 人 芋 类 于 表 状 + 
return ERROR; // 插入 失败 
Ss -next =p-next; // 新 结 点 指向 原 第 i 个 结 点 
p->next= s; // 原 第 -1 个 结 点 指向 新 结 点 
} 
return OK; // 插入 成 功 
} 
Status ListDelete(LinkList &L,int i,ElemType &e) 
{ // 在 不 设 头 结 点 的 单 链 线性 表 工 中 ,删除 第 i 个 元 素 , 并 由 ee 返回 其 值 
int j=1; // 计数 器 初 值 为 1 
LinkList qyp=L; // p 指 向 第 1 个 结 点 
if(1L) // 表 工 空 
return ERROR; // 删除 失败 
else if(i==1) // 删除 第 1 个 结 点 ( 见 图 2-24) 
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(a) p 指 向 第 1 个 结 点 (b) 指向 第 2 个 结 点 
图 2-24 删除 链表 L 的 第 1 个 结 点 


{ LE=p->next; // 工 由 第 2 个 结 点 开始 (改变 D) 
e=p->>data; // 将 待 删 结 点 的 值 赋 给 e 
free(p); // 删除 并 释放 第 1 个 结 点 
} 
else( 见 图 2-25) 
{ while(p -二 next&&j<i-1) // 寻找 第 个 结 点 ,并 令 p 指 向 其 前 驱 
{ j++; // 计数 器 +1 
p=p -next; // p 指 向 下 一 个 结 点 
} 
证 (!p- 二 next||j>i- 1) // 删除 位 置 不 合理 
return ERROR; // 删除 失败 
q=p->next; // q 指 向 待 删除 结 点 
p -next = qnext; // 待 删 结 点 的 前 驱 指 向 待 删 结 点 的 后 继 


一 盖 


| 二 | [4 


| i-l i 计 1 
(a) 初 态 ，p 指 向 第 1 个 结 点 
p 


| 


一 LO-… 一 LDLD-LT-… 
1 i-l i itl 
(b) p 指 向 第 i-1 个 结 点 
p q 
b= Tlie | | 刁 | + 
1 il 1 itl 
(0) 从 链表 中 删除 第 i 个 结 点 


图 2-25 删除 链表 L 的 第 i 个 结 点 (i 才 1) 


e=q->data; // 将 待 删 结 点 的 值 赋 给 e 
free(q); // 释放 待 删 结 点 
; 
return OK; // 删除 成 功 
} 
void ListTraverse(LinkList L,void(# vi)(ElemType)) 
// 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 依次 对 工 的 每 个 数据 元 素 调 用 函数 vi() 
LinkList p=L; // p 指 向 第 1 个 结 点 
while(p) // p 所 指 结 点 存在 
{ vi(p->data); // 对 p 所 指 结 点 调用 函数 vi() 
p=p->next; // p 指 向 下 一 个 结 点 
} 
printf("\n"); 


// bo2-4.cpp 不 设 头 结 点 的 单 链表 (存储 结构 由 c2-2.h 定义 ) 的 部 分 基本 操作 (2 个 ) 
Status PriorElem(LinkList L,ElemType cur e,ElemType &pre e) 
{ // 初始 条 件 : 线性 表 工 已 存在 


线性 表 


// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 第 一 个 , 则 用 pre_e 返回 它 的 前 驱 , 返 回 OK; 


// 否则 操作 失败 ,pre_e 无 定义 ,返回 ERROR 
LinkList q,p=L; // p 指 向 第 1 个 结 点 
while(p -二 next) // p 所 指 结 点 有 后 继 
{ q=p->next; // q 指 向 p 的 后 继 
if(q -data == cur_e) // p 的 后 继 为 cur_e 
{ pre_e=p-data; // 将 p 所 指 元 素 的 值 赋 给 pre_e 
return OK; // 成 功 返回 OK 


} 
b 


p=q; // Pp 的 后 继 不 为 cur_e,p 向 后 移 
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} 
return ERROR; // 操作 失败 ,返回 ERROR 
} 
Status NextElem(LinkList 工 ,ElemTYype cur e,ElemType &next e) 
{ // 初始 条 件 : 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 最 后 一 个 , 则 用 next_e 返回 它 的 后 继 , 返 回 Ok， 
// 否则 操作 失败 ,next_e 无 定义 ,返回 ERROR 
LinkList pP=L; // p 指 向 第 1 个 结 点 
while(p -二 next) // p 所 指 结 点 有 后 继 
{ 证 (p- 二 data== cur_e) // p 所 指 结 点 的 值 为 cur_e 
{ next e=p->next -data; // 将 p 所 指 结 点 的 后 继 结 点 的 值 赋 给 next_e 
return OK; // 成 功 返 回 OK 


\ 
i 


p=Pp->next; // p 指 向 下 一 个 结 点 
} 
return ERROR; // 操作 失败 ,返回 ERROR 
} 


// main2-3. cpp 检验 bo2-3. cpp 和 bo2-4. cpp 的 主 程序 

间 include"cl.h" 

typedef int ElemType; // 定义 ElemType 为 整 型 

间 include"c2-2.h"” // 线性 表 的 单 链表 存储 结构 

# include" bo2-3. cpp"// 不 设 头 结 点 单 链表 的 基本 操作 (9 个 ) 

间 include"bo2-4.cpp"// 不 设 头 结 点 单 链表 的 基本 操作 (2 个 ) 

间 include"func2-2.cpp" // 包括 equal() .comp() 、print() 、print1() 和 print2() 阴 数 
# include" func2-3.cpp" // 主 函数 


程序 运行 结果 同 main2-2. cpp 的 运行 结果 。 

和 带 有 头 结 点 的 单 链表 ( 见 图 2-12) 相 比 ,不 设 头 结 点 的 单 链表 ( 见 图 2-20) 显 得 更 直 
观 。 但 不 设 头 结 点 的 单 链表 在 插入 和 删除 第 1 个 元 素 时 与 插入 和 删除 其 他 元 素 时 的 操作 不 
一 样 ,要 改变 链表 头 指针 的 值 。 而 带 有 头 结 点 的 单 链 表 无 论 插 和 信和 删除 第 几 个 元 素 , 其 操作 
都 是 统一 的 。 这 从 bo2-2. cpp 和 bo2-3. cpp 两 文件 中 的 ListInsert() 及 ListDelete() 函 数 的 
区 别 可 看 出 。 不 设 头 结 点 的 单 链 表 在 第 7 章 中 有 应 用 。 

顺序 存储 结构 也 可 以 实现 链 式 存储 功能 。 首 先 ,开辟 一 个 充分 大 的 结构 体 数 组 。 结 构 
体 的 一 个 成 员 存放 数据 元 素 , 另 一 个 成 员 (* 游 标 ”) 存 放 链 表 中 下 一 个 数据 元 素 在 数组 中 的 
位 置 ,这 称 为 静态 链表 。 静 态 链 表 存 于 数组 中 ,但 链表 的 输出 却 不 是 按 数组 的 顺序 输出 的 ， 
而 是 由 一 个 指定 的 位 置 开 始 根据 游标 依次 输出 的 。 教 科 书 10. 2. 2 节 中 “ 表 插 入 排序 ”就 用 
到 了 静态 链表 。c2-3. h 就 是 这 样 的 一 个 数据 存储 结构 。algo2-4. cpp 是 以 c2-3. h 为 数据 存 
储 结构 ,输出 教科 书 中 图 2. 10 静态 链表 的 示例 程序 。 

// c2-3.h 线性 表 的 静态 单 链表 存储 结构 。 在 教科 书 第 31 页 ( 见 图 2-26) 

间 define MAX_SIZE 100 // 链表 的 最 大 长 度 


typedef struct 
{ ElemType data; 
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int cur; component SLinkList 
}component ,SLinkList[MAX SIZE|; datal cur | | data| cur |[0] 


[1 


// algo2-4.cpp 教科 书 中 图 2.10 静态 链表 示例 
// 第 1 个 结 点 的 位 置 在 [0].cur 中 。 成 员 cur 的 值 为 0， 


[MAX_SIZE-2] 


// 则 到 链表 尾 [MAX_SIZE-1] 
间 include"cl.h" sy 
提 define N 6 // 字符 串 的 最 大 长 度 +1 图 2-26 表态 单 链表 存储 结构 


typedef char ElemType[ N]; // 定义 ElemType 为 字符 串 类 型 
间 include"c2-3.h" // 线性 表 的 静态 单 链表 存储 结构 
void main() 
{ 
SLinkList s= {{"",1},{"ZHAO" ,2},{"QIAN" ,3},{"SUN" ,4},{"LI",5},{"ZHOU" ,6}, 
{"WO" ,7) ,{"ZHENG" ,8) ,{"WANG" ,0}}; // 教科 书 中 图 2.10(a) 的 状态 
int i= s[0].cur; // i 指示 第 1 个 结 点 的 位 置 
while(i) // 未 到 链表 尾 
{ // 输出 教科 书 中 图 2.10(a) 的 状态 
printf("%s",s[i].data); // 输出 链表 的 当前 值 
i= s[i].cur; // 找到 下 一 个 数据 的 位 置 
printf("\n"); 
s[4].cur = 9; // 按 教科 书 中 图 2.10(b) 修 改 ( 在 "LI" 之 后 插入 "SHI") 
s[9].cur=5; 
strcpy(s[9]. data, "SHI"); 
s[6].cur = 8; // 删除 "ZHENG” 
i= s[0].cur; // i 指示 第 1 个 结 点 的 位 置 
while(i) // 未 到 链表 尾 
{ // 输出 教科 书 中 图 2. 10(b) 的 状态 
printf("%s",s[i].data); // 输出 链表 的 当前 值 
i= s[ 订 .cur; // 找到 下 一 个 数据 的 位 置 
} 
printf("\n"); 
} 


程序 运行 结果 : 


ZHAO QIAN SUN LI ZHOU WU ZHENG WANG 
ZHAO QIAN SUN LI SHI ZHOU WU WANG 


如 果 按 照 数 组 的 输出 方式 ,教科 书 中 图 2. 10(b) 的 输出 应 该 是 : 


ZHAO QIAN SUN LI ZHOU WU ZHENG WANG SHI 


algo2-4. cpp 输出 不 是 按 数 组 的 顺序 输出 的 ,而 是 像 链 表 一 样 ,由 当前 结 点 cur 成 员 的 
值 决 定 下 一 个 结 点 的 位 置 确定 输出 ,这 就 是 链表 的 特点 。 但 algo2-4. cpp 插入 新 结 点 完全 
靠 人 工 判断 该 结 点 是 否 为 空闲 结 点 ,而 不 是 “自动 地 ?找到 空闲 结 点 作为 新 结 点 ,这 不 能 满足 
实际 应 用 的 需要 。 为 了 解决 这 个 问题 ,要 将 所 有 空闲 结 点 链接 形成 一 个 备用 链表 。 将 数组 
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下 标 为 0 的 单元 设 为 备用 链表 的 头 结 点 (这 时 ,链表 的 头 结 点 就 不 能 是 数组 下 标 为 0 的 单元 
了 ,一般 将 数组 下 标 为 MAX_SIZE 一 1 的 单元 ,也 就 是 最 后 一 个 单元 , 设 为 链表 的 头 结 点 ) 。 
这 样 ,在 静态 数组 中 实际 上 有 2 个 链表 ,一 个 链表 上 链接 的 是 线性 表 的 结 点 , 另 一 个 链表 ( 备 
用 链表 ) 上 链接 的 是 所 有 未 被 使 用 的 结 点 。 静 态 数组 的 每 一 个 单元 都 链接 在 这 2 个 链表 中 
的 一 个 上 。 图 2-27 说 明了 这 种 情况 。 为 了 图 示 方便 起 见 , 暂 定义 MAX_SIZE 为 10。 将 首 
尾 两 个 单元 分 别 设 为 备用 链表 头 结 点 和 链表 头 结 点 ,如 图 2-27(a) 所 示 。 链 表 的 数据 元 素 依 


次 是 1.7.6、.2.4。[5]\[3].[8] 三 个 单元 是 空闲 结 点 ,其 中 的 数据 是 无 效 的 。cur 成 员 为 0 
的 单元 是 链表 的 最 后 一 个 结 点 。 
0|5 |[0] 一 一 备用 链表 头 结 点 
117|0] 
2|44[2] 9 (0 [中 [6 [2 由 
3|8 [3] 9|1||1|7||7|6||6l2||2|4||4|0 
ors 0 lonlanlce 
5|3 |[5] (b) 链表 (1、7、6、2、4) 
6|2 [6] 
2 问 0] [5] [3] ks 
[sf 一 狂 才 2 结 起 [95 L513 [lsj [slo 
(a) 静态 链表 数组 (0) 备用 链表 


图 2-27 静态 单 链表 结构 中 的 2 个 链表 


通过 上 面 的 初步 介绍 ,可 以 看 出 ,静态 链表 和 单 链表 的 主要 区 别 有 两 点 : 

(1) 单 链表 的 结 点 通过 malloc() 函数 产生 , 结 点 被 限制 在 动态 存储 区 这 个 大 范围 内 。 
因此 ,指示 结 点 位 置 的 指针 类 型 实际 上 是 长 整 型 。 而 静态 链表 的 结 点 被 限制 在 静态 数组 这 
个 小 范围 内 。 因 此 ,指示 结 点 位 置 的 指针 (cur 成 员 ) 一 般 是 整 型 ,甚至 也 可 以 是 字 节 型 ,只 
要 MAX_SIZE 小 于 256。 从 这 点 上 看 ,静态 链表 更 容易 管理 。 

(2) 单 链表 中 不 用 的 结 点 通过 free() 函 数 释 放 , 释 放 后 的 结 点 由 编译 软件 管理 。 而 静 
态 链 表 中 不 用 的 结 点 要 自己 管理 (插入 到 备用 链表 中 )。 

当 静 态 链表 需要 新 结 点 时 ,把 备用 链表 中 的 首 元 结 点 (由 [0]. cur 指示 ) 从 备用 链表 中 
删除 ,作为 新 结 点 ,插入 静态 链表 。 当 删除 静态 链表 中 的 结 点 时 ,被 删除 的 结 点 插入 备用 链 
表 中 ,成 为 备用 链表 的 首 元 结 点 。 之 所 以 从 备用 链表 删除 结 点 或 向 备用 链表 插入 结 点 的 操 
作 都 在 表 头 进行 ,是 因为 这 样 效率 最 高 。 开 辟 新 结 点 和 回收 空闲 结 点 的 操作 如 算法 2. 15 和 
算法 2. 16 所 示 ,在 程序 bo2-5. cpp 中 实现 。 

// bo2-5. cpp 静态 链表 (数据 结构 由 c2-3.h 定义 ) 的 基本 操作 (13 个 ) 

// 包括 算法 2.13、 算 法 2.15 和 算法 2.16 

# define DestroyList ClearList // DestroyList() 和 ClearList() 的 操作 是 一 样 的 

int Malloc(SLinkList space) // 算法 2.15( 见 图 2-28) 

{ // 车 备用 链表 非 空 , 则 返回 分 配 的 结 点 下 标 (备用 链表 的 第 1 个 结 点 ) ,否则 返回 0 

int i= space[0].cur; // 备用 链表 第 1 个 结 点 的 位 置 
if(i) // 备用 链表 非 空 

space[ 0]. cur = space[ i].cur; // 备用 链表 的 头 结 点 指向 原 备用 链表 的 第 2 个 结 点 
return i; // 返回 新 开辟 结 点 的 坐标 

} 
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3 |[0] 备 用 链表 头 结 点 | | 5 | [备用 链表 头 结 点 
[ul ul 
四] [2] 
5 DB] 5_| [3] 一 一 i( 新 开辟 结 点 ) 
[4 [和 9 
| 10 [5] | 4005] 
| | |IMAX_SIZE-!] | | [MAX_SIZE-1] 
space space 
(a) 在 调用 Malloc0 之 前 ,备用 链 (b) 在 调用 Malloc0 之 后 ,备用 链 
表 上 共有 2 个 结 点 : [3] 和 [5] 表 上 只 有 1 个 结 点 [5] 


图 2-28 调用 Malloc() 示 例 


void Free(SLinkList space,int k) // 算法 2.16( 见 图 2-29) 

{ // 将 下 标 为 k 的 空闲 结 点 回收 到 备用 链表 中 (成 为 备用 链表 的 第 1 个 结 点 ) 
space[k].cur = space[0].cur; // 回收 结 点 的 “游标 ”指向 备用 链表 的 第 1 个 结 点 
space[0].cur =k; // 备用 链表 的 头 结 点 指向 新 回收 的 结 点 

} 

void InitList(SLinkList L) 

{ // 构造 一 个 空 的 链表 工 , 表 头 为 工 的 最 后 一 个 单元 LLMAX_SIZE - 1], 其余 单 元 链 成 
// 一 个 备用 链表 , 表 头 为 工 的 第 一 个 单元 LL0],“0” 表 示 空 指针 ( 见 图 2-30) 


3 |[0] 备 用 链表 头 结 点 2 | [0] 备 用 链表 头 结 点 
[1 10 
习 一 一 k( 空 有 亲 结 点 3 C2 ee 
[国人 综 用 结语 回扣 站 [0] 备用 链表 头 结 点 
1 了 Eb 
0 |[5 0 |[5 p 
: 加 [0 | 局 41] 
[MAX_SIZE-1] [MAX_SIZE-1] 
Space | 98 a 
0 
(a) 在 调用 Free0) 之 前 ,备用 链表 (b) 在 调用 Free0) 之 后 ,备用 链表 | 0 | [99] 空 链表 头 结 点 
上 有 2 个 结 点 : [3] 和 [5] 上 有 3 个 结 点 [2]、 [3] 和 [5] L 
图 2-29 调用 Free() 示 例 图 2-30 ”构造 空 链 表 L 
int i; 


L[MAX_SIZE 一 1].cur = 0; // 工 的 最 后 一 个 单元 为 空 链表 的 表 头 
for(i=0;i<MAX_SIZE 2;i++ ) // 将 其 余 单元 链接 成 以 IL0] 为 表 头 的 备用 链表 
L[i].cur=i+1; 
L[MAX_SIZE— 2].cur=0; 
} 
void ClearList(SLinkList L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 将 工 重 置 为 空 表 
int j,k,i=ILLMAX_ SIZE- 1].cur; // i 指示 链表 第 1 个 结 点 的 位 序 
L[MAX_SIZE - 1]. cur = 0; // 链表 空 
k=I[0].cur; // 备用 链表 第 1 个 结 点 的 位 置 
LI[Lo].cur= i; // 把 链表 的 结 点 连 到 备用 链表 的 表 头 
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while(i) // 未 到 链表 尾 
{ j=i; //j 指 示 当 前 结 点 的 位 序 
i=I[i.cur; // 指向 下 一 个 结 点 的 位 序 
} 
L[j].cur =k; // 备用 链表 的 第 1 个 结 点 接 到 链表 的 尾部 
} 
Status ListEmpty(SLinkList L) 
{ // 车 工 是 空 表 ,返回 TRUE, 否 则 返回 FALSE 
if(L[MAX_SIZE - 1].cur == 0) // 空 表 ( 表 头 结 点 的 cur 域 为 0) 
return TRUE; 
else 
return FALSE; 
} 
int ListLength(SLinkList L) 
// 返回 工 中 数据 元 素 个 数 
int j=0,i=L[MAX SIZE- 1].cur; // i 指示 链表 的 第 1 个 结 点 的 位 序 
while(i) // 未 到 静态 链表 尾 
{ i=L[i]j.cur; // i 指向 下 一 个 结 点 
j++; // 计数 器 +1 
} 
return j; 
} 
Status GetElem(SLinkList L,int i.ElemType &e) 
// 用 e 返 回 工 中 第 主 个 元 素 的 值 
int m,k= MAX_SIZE - 1; //k 指 示 表 头 结 点 的 位 序 
if(i<1||i>ListLength(L)) // 不 存在 第 i 个 元 素 
return ERROR; 
for(m= 1;m<= i;m++)// kk 向 后 移动 到 第 i 个 元 素 处 
k=I[k].cur; // 指向 下 一 个 元 素 
e=L[kj.data; // 将 第 i 个 元 素 的 值 赋 给 e 
return OK; 
} 
int LocateElem(SLinkList L,ElemType e) // 算法 2.13( 有 改动 ) 
{ // 在 静态 单 链 线性 表 工 中 查找 第 1 个 值 为 e 的 元 素 。 若 找到 , 则 返回 它 在 工 中 的 位 序 ,否则 返回 0 
// (与 其 他 LocateElem( ) 的 定义 不 同 ) 
int i=L[MAX_SIZE - 1].cur; // i 指示 表 中 第 1 个 结 点 的 位 序 
while(i&g&L[i].datal = e) // 在 表 中 顺 链 查找 (e 不 能 是 字符 串 ) ,找到 或 已 到 表 尾 ,结束 循环 
i=L[i].cur; // 指向 下 一 个 元 素 
return i; 
} 
Status PriorElem( SLinkList 工 .ElemTYpe cur e.ElemType &pre e) 
{ // 初始 条 件 : 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 第 一 个 . 则 用 pre_e 返回 它 的 前 驱 ; 
// 否则 操作 失败 ,pre_e 无 定义 
int j,i=L[MAX_SIZE - 1].cur; // i 指示 链表 第 1 个 结 点 的 位 置 


do // 向 后 移动 结 点 
{ j=i; // j 指 向 i 所 指 元 素 
主 = 工 [ 订 .cur; // 主 指 向 下 一 个 元 素 
}while(ig&gcur_ el =L[i].data); // i 所 指 元 素 存 在 且 其 值 不 是 cur_e, 继 续 循 环 
iE(i) // 找到 该 元 素 
{ pre_e=L[j].data; // j 所 指 元 素 是 二 所 指 元 素 的 前 驱 元 素 , 赋 给 pre_e 
return OK; 
} 
return ERROR; // 未 找到 该 元 素 ,或 其 无 前 驱 
} 
Status NextElem(SLinkList L,ElemType cur e,ElemType &next e) 
{ // 初始 条 件 : 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 最 后 一 个 , 则 用 next_e 返回 它 的 后 继 ; 
// 否则 操作 失败 ,next_e 无 定义 
int j,i= LocateElem(L,cur e); // 在 工 中 查找 第 1 个 值 为 cur_e 的 元 素 的 位 置 
if(i) // 工 中 存在 元 素 cur_e 
{ j=LLi.cur; // j 指示 cur_e 的 后 继 的 位 置 
if(j) // cur_e 有 后 继 
{ next_e=L[j].data; // 将 cur_e 的 后 继 赋 给 next_e 
return OK; // cur_e 元素 有 后 继 
} 
} 
return ERROR; // 工 不 存在 cur_e 元 素 , 或 cur_e 元 素 无 后 继 
} 
Status ListInsert(SLinkList L,int i,ElemType e) 
{ // 在 工 中 第 i 个 元 素 之 前 插入 新 的 数据 元 素 e( 见 图 2-31) 


3 |[0] 备 用 链表 头 结 点 [0] 备 用 链表 头 结 点 
6| 2 [1] [0] 
25| 0 |D] 参数 : [2] 
4 09] i=2 DB] 
e=33 ‘ 
98 |[97] [97] 
0 |[98] [98] 
1 | [99] 链 表 头 结 点 [99] 链 表 头 结 点 
(a) 在 调用 ListInsertO 之 前 , 链 (b) 在 调用 ListInsert0 之 后 ,链表 
表 L 上 有 2 个 元 素 : 6 和 25 L 上 有 3 个 元 素 : 6、33 和 25 


图 2-31 调用 ListInsert() 示 例 


int m,j,k= MAX_SIZE 1; // 上 指示 表 头 结 点 的 位 序 
if(i< 一 1||i 盖 ListLength(L) +1) // i 值 不 合法 
return ERROR; 
j= Malloc(L); // 申请 新 单元 
i£(j) // 申请 成 功 
{ I[j]. data=e; // 将 e 赋 值 给 新 单元 
for(m=1;m<i;m++ ) // 向 后 移动 i-1 个 结 点 ,使 k 指 示 第 i-1 个 结 点 
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k=L[k].cur; // 指向 下 一 个 结 点 
I[].cur = IL[kJ.cur; // 新 单元 指向 第 站- 1 个 元 素 后 面 的 元 素 (第 i 个 元 素 ) 
I[kj.cur=j; // 第 i 一 1 个 元 素 指向 新 单元 
return OK; 
} 
return ERROR; 
} 
Status ListDelete(SLinkList L,int i,ElemType &e) 
{ // 删除 在 工 中 第 i 个 数据 元 素 e, 并 返回 其 值 ( 见 图 2-32) 


3 |[0] 备 用 链表 头 结 点 [0] 备 用 链表 头 结 点 
| 6| 2 [1] [0] 
25| 0 |D] 参数 : 器 返回 值 
4 |[3] i= D] e=25 
98 |[97] [97] 
0 |[98] [98] 
1 | [99] 链 表 头 结 点 [99] 链 表 头 结 点 
L 
(a) 在 调用 ListDelete() 之 前 , 链 (b) 在 调用 ListDelete() 之 后 ， 
表 L 上 有 2 个 元 素 : 6 和 25 链表 L 上 有 1 个 元 素 : 6 


图 2-32 调用 ListDelete() 示 例 


int j,k= MRX SIZE- 1; // k 指 示 表 头 结 点 的 位 序 
if(i<1||i>>ListLength(L)) // i 值 不 合法 
return ERROR; 
for(j=1;j<i;j++) // 移动 i-1 个 元 素 . 使 k 指 向 第 i-1 个 元 素 
k=L[kj.cur; // 指向 下 一 个 元 素 
j= LILk].cur; // 待 删除 元 素 (第 大 个 元 素 ) 的 位 置 赋 给 j 
L[k].cur=EL[j]j.cur; // 使 第 i- 1 个 元 素 指向 待 删除 元 素 的 后 继 元 素 
e=IL[jj.data; // 待 删除 元 素 的 值 赋 给 e 
Free(L,j); // 释放 待 删除 结 点 (回收 到 备用 链表 中 ) 
return OK; 
} 
void ListTraverse(SLinkList L,void(% visit)(ElemType)) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 依次 对 工 的 每 个 数据 元 素 调用 函数 visit() 
int i= L[MAX_STZE- 1].cur; // i 指示 第 1 个 元 素 的 位 序 
while(i) // 未 到 静态 链表 尾 
{ visit(L[i].data); // 对 当前 元 素 调 用 visit() 
六 =IL[i].cur; // 指向 下 一 个 元 素 
} 
printf("\n"); 


// main2-4. cpp 检验 bo2-5. cpp 的 主 程序 
间 include"cl.h" 
typedef int ElemType; // 定义 ElemType 为 整 型 
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间 include"c2-3.h" // 静态 单 链表 的 存储 结构 

间 include"bo2-5.cpp”// 静态 链表 的 基本 操作 (13 个 ), 包 括 算法 2.13、 算 法 2.15 和 算法 2.16 
间 include"func2-2.cpp" // 包括 equal() .comp() .print() ,print1() 和 print2() 滑 数 

typedef SLinkList LinkList; // 定义 func2-3.cpp 中 的 LinkList 类 型 为 SLinkList 类 型 

间 define SLL // 定义 了 SLL( 静 态 链 表 标 志 ) ,使 func2-3. cpp 选择 执行 静态 链表 特有 的 函数 

间 include"func2-3.cpp" // 主 函数 


程序 运行 结果 : 


在 工 的 表 头 依次 插 和 人 1~5 后 ,L=54321 

工 是 否 空 ? i= 0(1: 是 0: 否 ), 表 工 的 长 度 =5 

清空 并 后 ,= 

工 是 否 空 ? 1i=1(1: 是 0: 否 ), 表 工 的 长 度 =0 

在 工 的 表 尾 依次 插入 1~10 后 ,L=12345678910 

没有 值 为 0 的 元 素 , 值 为 1 的 元 素 的 位 序 为 5 

元 素 1 无 前 驱 ,元 素 2 的 前 驱 为 1 

元 素 9 的 后 继 为 10 ,元 素 10 无 后 继 

删除 第 11 个 元 素 失败 (不 存在 此 元 素 )。 删 除 第 10 个 元 素 成 功 , 其 值 为 10 
依次 输出 工 的 元 素 : 123456789 


232 循环 链表 


单 链 的 循环 链表 结 点 的 存储 结构 和 单 链表 结 点 的 存储 结构 一 样 。 所 不 同 的 是 : 最 后 一 
个 结 点 的 next 域 指向 头 结 点 ,而 不 是 * 空 ”。 这 样 , 由 表 尾 很 容易 找到 表 头 。 但 若 链表 较 长 ， 
则 由 表 头 找到 表 尾 较 费 时 。 因 而 , 单 循 环 链表 往往 设立 尾 指针 而 不 是 头 指针 ,如 图 2-33 所 
示 。 这 在 两 个 链表 首尾 相连 合并 成 一 个 链表 时 非常 方便 。bo2-6. cpp 是 设立 尾 指针 的 单 循 
环 链表 的 基本 操作 。 


Eee 


头 结 点 尾 指针 
图 2-33 设立 尾 指针 且 具 有 2 个 结 点 (4,7) 的 单 循环 链表 


// bo2-6.cpp 设立 尾 指 针 的 单 循环 链表 (存储 结构 由 c2-2.h 定义 ) 的 12 个 基本 操作 
void InitList(LinkList &L) 
{ // 操作 结果 : 构造 一 个 空 的 线性 表 工 ( 见 图 2-34) 


L= (LinkList)malloc(sizeof(LNode)); // 产生 头 结 点 ,并 使 工 指向 此 头 结 点 
i£(1L) // 存储 分 配 失败 

exit(OVERFLON) ; “i 
L->next=L; // 头 结 点 的 指针 域 指向 头 结 点 头 结 点 站 


1 


void ClearList(LinkList &L) // 改变 工 图 2-34 空 ( 仅 有 头 结 点 ) 的 单 循环 链表 工 


{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 将 工 重 置 为 空 表 ( 见 图 2-34) 
LinkList p,q; 
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L=L->next; // 工 指向 头 结 点 
p=L->next; // p 指 向 第 1 个 结 点 
while(p! =L) // 未 到 表 尾 
{ q=p->next; // q 指 向 p 的 后 继 结 点 
free(p); // 释放 p 所 指 结 点 
p= q; // Pp 指向 q 所 指 结 点 
} 
EL->next=L; // 头 结 点 指针 域 指 向 自身 ( 头 结 点 ) 
} 
void DestroyList(LinkList &L) 
{ // 操作 结果 : 销毁 线性 表 工 ( 见 图 2-35) 


ClearList(L); // 将 表 工 重 置 为 空 表 NULL 
free(L); // 释放 工 所 指 结 点 ( 头 结 点 ) L 
L= NULL; // 工 不 指向 任何 存储 单元 图 2-35 线性 表 L 被 销毁 


} 
Status ListEmpty(LinkList L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 若 工 为 空 表 , 则 返回 TRUE, 否 则 返回 FALSE 
if(L ->next ==L) // 空 
return TRUE; 
else 
return FALSE; 
} 
int ListLength(LinkList L) 
{ // 初始 条 件 : 工 已 存在 。 操 作 结果 : 返回 工 中 数据 元 素 个 数 
int i=0; 
LinkList p= 工 -二 next; // p 指向 头 结 点 
while(p! = L) // 未 到 表 尾 
{ 主 村 ; // 计数 器 +1 
p=p-next; // p 指 向 下 一 个 结 点 
} 
return i; 
} 
Status GetElem(LinkList L,int i,ElemType &e) 
{ // 当 第 i 个 元 素 存在 时 ,其 值 赋 给 e 并 返回 0K, 否 则 返回 ERROR 
int j=1; // 初始 化 ,j 为 计数 器 , 初 值 为 1 
LinkList p= 工 -二 next -二 next; // p 指 向 第 1 个 结 点 
if(i 二 =0||i>ListLength(L)) // 第 宕 个 元 素 不 存在 
return ERROR; 
while(j<i) // 顺 指针 向 后 查找 ,直到 p 指向 第 i 个 元 素 
{ j++i // 计数 器 +1 
p=P->next; // p 指 向 下 一 个 结 点 
} 
e=p->data; // 第 i 个 元 素 赋 给 e 
return OK; 
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} 


int LocateElem(LinkList L.ElemType e.Status(% compare) (ElemType,ElemType)) 
{ // 初始 条 件 : 线性 表 工 已 存在 ,compare() 是 数据 元 素 判 定 函数 
// 操作 结果 : 返回 工 中 第 1 个 与 e 满 足 关系 compare() 的 数据 元 素 的 位 序 。 
// 车 这 样 的 数据 元 素 不 存在 , 则 返回 值 为 0 
int i=0; // 计数 器 初 值 为 0 
LinkList p= 工 - 盖 next -next; // p 指 向 第 1 个 结 点 
while(p! =L- 二 next) // p 未 指向 头 结 点 
{ 二 4+; // 计数 器 +1 
if(compare(p -二 datave)) // 找到 这 样 的 数据 元 素 
return i; // 返回 其 位 序 
p=p->next; // p 指 向 下 一 个 结 点 
} 
return 0; // 满足 关系 的 数据 元 素 不 存在 
} 
Status PriorElem(LinkList L,ElemType cur e,ElemType &pre e) 
{ // 初始 条 件 : 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 第 一 个 , 则 用 pre_e 返回 它 的 前 驱 , 返 回 OK， 
// 否则 操作 失败 ,pre_e 无 定义 ,返回 ERROR 
LinkList q,p=L->next ->>next; // p 指 向 第 1 个 结 点 
q=p->next; // q 指 向 p 的 后 继 
while(q! =L->next) // p 未 到 表 尾 (q 未 指向 头 结 点 ) 
{ if(q- 记 data == cur_e) // p 的 后 继 为 cur_e 
{ pre_e=p- 二 data; // 将 p 所 指 元 素 的 值 赋 给 pre_e 
return OK; // 成 功 返 回 OK 
p=q; // p 的 后 继 不 为 cur_e,p 向 后 移 
q=q- 二 next; // q 指 向 p 的 后 继 
} 
return ERROR; // 操作 失败 ,返回 ERROR 
} 
Status NextElem(LinkList L.ElemType cur e.ElemType &next e) 
{ // 初始 条 件 : 线性 表 工 已 存在 
// 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 最 后 一 个 , 则 用 next_e 返回 它 的 后 继 ,返回 OK， 
// 否则 操作 失败 ,next_e 无 定义 ,返回 ERROR 
LinkList p= 工 - 盖 next -二 next; // p 指 向 第 1 个 结 点 
while(pl =IL) // p 未 到 表 尾 
{ 许 (p- 盖 data== cur_e) // p 所 指 结 点 的 值 为 cur_e 
{ next_e=p- 二 next -data; // 将 p 所 指 结 点 的 后 继 结 点 的 值 赋 给 next_e 
return OK; // 成 功 返 回 OK 
} 
p=p->next; // p 指 向 下 一 个 结 点 
} 
return ERROR; // 操作 失败 ,返回 ERROR 
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Status ListInsert(LinkList &L,int i,ElemType e) 
{ // 在 工 的 第 i 个 位 置 之 前 插入 元 素 e( 改 变 D) 
LinkList p= 工 ->next,s; // p 指向 头 结 点 
int j= 0; // 计数 器 初 值 为 0 
if(i 一 = 0||i>ListLength(L) +1) // i 值 不 合法 
return ERROR; // 插入 失败 
while(j 一 i-1) // 寻找 第 i-1 个 结 点 
{j++; // 计数 器 +1 
p=p->next; // p 指 向 下 一 个 结 点 
} 


s= (LinkList)malloc(sizeof(LNode)); // 生成 新 结 点 ,以 下 将 其 插入 工 中 


s -data = e; // 将 e 赋 给 新 结 点 
s->next=p->next; // 新 结 点 指向 原 第 i 个 结 点 
p->next = s; // 原 第 i-1 个 结 点 指向 新 结 点 
让 (p==D) // 插 在 表 尾 ( 见 图 2-36) 

L= s; // 工 指向 新 的 尾 结 点 
return OK; // 插入 成 功 


| | 
寺中 


(a) 初 态 ,p 指 向 头 结 点 (b) p 指 向 第 -1 个 结 


| e S 
| | L 


1 记 1 


p 
(©) 插入 s 为 尾 结 点 
图 2-36 在 链表 L 的 表 尾 插 人 元 素 e 


Status ListDelete(LinkList &L,int i,.ElemType &e) 
{ // 删除 工 的 第 个 元 素 , 并 由 ee 返回 其 值 (改变 ID) 
LinkList q,p=E- 二 next; // p 指向 头 结 点 
int j= 0; // 计数 器 初 值 为 0 
站 (i 二 = 0||i>ListLength(L)) // 第 二 个 元 素 不 存在 
return ERROR; // 删除 失败 
while(j<i- 1) // 寻找 第 i-1 个 结 点 
{ jt++i // 计数 器 +1 
P=Pp -next; // p 指 向 下 一 个 结 点 
} 
q=p->next; // q 指 向 待 删除 结 点 ,p 的 后 继 
p -next = q -next; // 待 删 结 点 的 前 驱 指向 待 删 结 点 的 后 继 


i-l 


点 ( 尾 名 


p 


吉 点 


网 


) 
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e=q->data; // 将 待 删 结 点 的 值 赋 给 e 
if(L== q) // 删除 的 是 表 尾 元 素 ( 见 图 2-37) 
L=p; // 工 指向 新 的 表 尾 元 素 
| | 二 吉 1 凰 寺 - 4 … 一-| | -| | 一世 


| 1 i-1 i 1 可 | i 


q 


(a) 初 态 ,p 指 向 头 结 点 (b) p 指 向 第 i-1 个 结 点 


(©) 从 链表 上 删除 第 i 个 结 点 
图 2-37 删除 链表 L 的 表 尾 结 点 


free(q); // 释放 待 删除 结 点 
return OK; // 删除 成 功 
} 
void ListTraverse(LinkList L,void(# vi)(ElemType)) 
// 初始 条 件 : 工 已 存在 。 操 作 结果 : 依次 对 工 的 每 个 数据 元 素 调 用 函数 vi() 
LinkList p= 工 -二 next -二 next; // p 指 向 首 元 结 点 
while(p! =L- 二 next) // p 不 指向 头 结 点 
{ vi(p- 二 data); // 对 p 所 指 结 点 调用 函数 vi() 
p=Pp->next; // p 指 向 下 一 个 结 点 
printf("\n"); 


// main2-5. cpp 单 循环 链表 ,检验 bo2-6. cpp 的 主 程序 

include"cl1.h" 

typedef int ElemType; // 定义 ElemType 为 整 型 

间 include"c2-2.h" // 线性 表 的 单 链表 存储 结构 

间 include"bo2-6.cpp"// 设立 尾 指针 的 单 循环 链表 存储 结构 的 12 个 基本 操作 

# include"func2-2.cpp" // 包括 equal() .comp() .print() .print1() 和 print2() 函 数 
# include" func2-3.cpp" // 主 函 数 


程序 运行 结果 同 main2-2. cpp 的 运行 结果 。 
233 双向 链表 


// c2-4.h 线性 表 的 双向 链表 存储 结构 。 在 教科 书 第 35 页 ( 见 图 2-38) 
typedef struct DuLNode 
{ ElemType data; 
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DuLNode * prior, * next; 
}DuLNode, * DuLinkList; 
双向 链表 ( 见 图 2-39) 的 每 个 结 点 有 2 个 指针 ,一 个 指向 结 点 的 前 驱 , 另 一 个 指向 结 点 的 
后 继 。 所 以 ,在 双向 链表 中 ,不 仅 可 以 容易 地 找到 后 继 结 点 ,也 很 容易 找到 前 驱 结 点 。 


DuLinkList DuLNode 
十 -一 | prior | data | next 
st sh, dn tt nd hr 四 本 了 让 全 
1 1 1 11 1 1 1 E | 上 4 G7 
一 头 结 点 
DuLNode DuLNode 
图 2-38 线性 表 的 双向 链表 存储 结构 图 2-39 带 有 头 结 点 且 具 有 2 个 结 点 
(4,7) 的 双向 循环 链表 L 


// bo2-7.cpp 带头 结 点 的 双向 循环 链表 (存储 结构 由 c2-4.h 定义 ) 的 基本 操作 (14 个 ) 
// 包括 算法 2.18 和 算法 2.19 

void InitList(DuLinkList &L) 

// 产生 空 的 双向 循环 链表 LL( 见 图 2-40) 


L= (DubinkList)malloc( sizeof (DuLNode)); 


L->next=L->prior=L; L 


图 2-40 空 的 双向 循环 链表 L 


else 
exit(OVERFLOW) ; 
} 
void ClearList(DuLinkList L) // 不 改变 工 
{ // 初始 条 件 : 工 已 存在 。 操 作 结果 : 将 工 重 置 ; 
DuLinkList p=L- 二 next; // p 指 向 第 1 个 结 上 
while(p! =L) // p 未 指向 头 结 点 
{ p=p->next; // p 指 向 下 一 个 结 点 
free(p -二 prior); // 释放 p 的 前 驱 结 点 
} 
1- 二 next =L- 二 prior=L; // 头 结 点 的 两 个 指针 域 均 指向 自身 
} 


罕 表 ( 见 图 2-40) 


void DestroyList(DuLinkList &L) NULL 
{ // 操作 结果 : 销毁 双向 循环 链表 L( 见 图 2-41) 下 
ClearList(L); // 将 工 重 置 为 空 表 ( 见 图 2-40) 图 2-41 销毁 双向 循环 链表 上 


free(L); // 释放 头 结 点 
L=NULL; // 工 不 指向 任何 存储 单元 
} 
Status ListEmpty(DuLinkList L) 
{ // 初始 条 件 : 线性 表 工 已 存在 。 操 作 结 果 : 车 工 为 空 表 . 则 返回 TRUE, 否 则 返回 FALSE 
if(L-~>next == L&&L ->prior ==L) 
return TRUE; 
else 
return FALSE; 
} 
int ListLength(DuLinkList L) 


{ // 初始 条 件 : 工 已 存在 。 操 作 结果 : 返回 工 中 数据 元 素 个 数 
int i=0; // 计数 器 初 值 为 0 
DuLinkList p= 工 -二 next; // p 指 向 第 1 个 结 点 
while(p! =I) // p 未 指向 头 结 点 
{ ++; // 计数 器 +1 
p=p->next; // p 指 向 下 一 个 结 点 
} 
return i; 
} 
Status GetElem(DuLinkList L,int i,ElemType &e) 
{ // 当 第 i 个 元 素 存在 时 ,其 值 赋 给 e 并 返回 OK; 否则 返回 ERROR 
int j=1; // 计数 器 初 值 为 1 
DuLinkList p=L- 二 next; // p 指 向 第 1 个 结 点 


while(p!l =L&&j 一 i) // 顺 指 针 向 后 查找 ,直到 p 指 向 第 i 个 元 素 或 p 指 向 头 结 点 


{ j++; // 计数 器 +1 
p=p->next; // p 指 向 下 一 个 结 点 
; 
if(P==z||1j>iD // 第 i 个 元 素 不 存在 
return ERROR; // 查找 失败 
e=p->datai // 取 第 个 元 素 赋 给 e 
return OK; // 查找 成 功 
} 


int LocateElem(DuLinkList L,ElemType e.Status(% compare) (ElemType.ElemType)) 


{ // 初始 条 件 : 工 已 存在 ,compare() 是 数据 元 素 判 定 函 数 


// 操作 结果 : 返回 工 中 第 1 个 与 e 满 足 关系 compare( ) 的 数据 元 素 的 位 序 。 


// 若 这 样 的 数据 元 素 不 存在 , 则 返回 值 为 0 
int i=0; // 计数 器 初 值 为 0 
DuLinkList p=L- 二 next; // p 指 向 第 1 个 元 素 
while(p! =L) // p 未 指向 头 结 点 
{六 4+; // 计数 器 +1 
证 (compare(p -二 datave)) // 找到 这 样 的 数据 元 素 
return i; // 返回 其 位 序 
p=p->next; // p 指 向 下 一 个 结 点 
return 0; // 满足 关系 的 数据 元 素 不 存在 
} 


Status PriorElem(DuLinkList L.ElemType cur e.ElemType &pre e) 
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{ // 操作 结果 : 若 cur_e 是 工 的 数据 元 素 , 且 不 是 第 一 个 , 则 用 pre_e 返回 它 的 前 驱 , 返 回 OK; 


jy 否则 操作 失败 ,pre_e 无 定义 ,返回 ERROR 
DuLinkList p=L->>next ->>next; // p 指 向 第 2 个 元 素 
while(pl =L) // p 未 指向 头 结 点 
{ 证 (p- 二 data== cur_e) // p 指 向 值 为 cur_e 的 结 点 
{ pre e=p->prior- 二 data; // 将 p 的 前 驱 结 点 的 值 赋 给 pre_e 
return OK; // 成 功 返回 OK 
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p=p->next; // p 指 向 下 一 个 结 点 
} 
return ERROR; // 操作 失败 ,返回 ERROR 
} 
Status NextElem(DuLinkList L.ElemType cur e.ElemType &next e) 
{ // 操作 结果 : 车 cur_e 是 工 的 数据 元 素 , 且 不 是 最 后 一 个 , 则 用 next_e 返回 它 的 后 继 , 返 回 OK， 
Mh 否则 操作 失败 ,next_e 无 定义 ,返回 ERROR 
DuLinkList p = 工 -二 next -二 next; // p 指 向 第 2 个 元 素 
while(p! =I) // p 未 指向 头 结 点 
{ if(p -这 prior -data == cur_e) // p 所 指 结 点 的 前 驱 的 值 为 cur_e 
{ next e=p->datai // 将 p 所 指 结 点 (cur_e 的 后 继 ) 的 值 赋 给 next_e 
return OK; // 成 功 返 回 OK 
} 
p=p->next; // p 指 向 下 一 个 结 点 
} 
return ERROR; // 操作 失败 ,返回 ERROR 
} 
DuLinkList GetElemP(DuLinkList L,int i) // 新 增 
{ // 在 双向 链表 工 中 返回 第 i 个 元 素 的 地 址 。i 为 0, 返 回头 结 点 的 地 址 。 若 第 i 个 元 素 不 存在 ， 
// 返回 NULL( 算 法 2.18 和 算法 2.19 要 调用 的 函数 ) 
int j; 
DuLinkList p=L; // p 指 向 头 结 点 
if(i 一 0||i 盖 ListLength(L)) // i 值 不 合法 
return NULL; 
for(j=1;j 二 =i;j 杆 )//p 指 向 第 i 并 个 结 点 
p=p->next; // p 指 向 下 一 个 结 点 
return p; 
} 
Status ListInsert(DuLinkList L,int i,ElemType e) 
{ // 在 带头 结 点 的 双 链 循环 线性 表 工 中 第 i 个 位 置 之 前 插入 元 素 e,i 的 合法 值 为 1<i< 表 长 +1 
// 改进 算法 2. 18, 和 否则 无 法 在 第 表 长 + 1 个 结 点 之 前 插入 元 素 ( 见 图 2-42) 


ce “ELIT 
头 结 点 1 1 i 


(a) 初 态 ,p 指 向 第 计 1 个 结 点 


买 结 点 i 时 已 i 
(b) 在 第 i 个 结 点 之 前 插入 值 为 e 的 结 点 
图 2-42 ”在 链表 的 第 i 个 位 置 之 前 插入 元 素 


DuLinkList p,s; 
if(i<1||i>ListLength(L) +1) // 并 值 不 合法 
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return ERROR; // 失败 返回 ERROR 
p= GetElemP(L,i 一 1); // 在 工 中 确定 第 个 结 点 前 驱 的 位 置 指针 p 
if£(1p) // p= NULL, 即 第 i 个 结 点 的 前 驱 不 存在 ( 设 头 结 点 为 第 1 个 结 点 的 前 驱 ) 
return ERROR; // 失败 返回 ERROR 
s = (DuLinkList)malloc(sizeof(DuLNode)); // 生成 新 结 点 
if(1s) 
return ERROR; // 生成 新 结 点 失败 返回 ERROR 
Ss -data= e; // 将 e 赋 给 新 结 点 
Ss 一 之 prior = p; // 新 结 点 的 前 驱 为 第 i-1 个 结 点 
Ss 一 next = pnext; // 新 结 点 的 后 继 为 第 i 个 结 点 
pnext -二 prior= si // 第 i 个 结 点 的 前 驱 指 向 新 结 点 
pP->next= s; // 第 i-1 个 结 点 的 后 继 指 向 新 结 点 
return OK; // 成 功 返 回 OK 
} 
Status ListDelete(DuLinkList L,int i,ElemType &e) // 算法 2.19 
{ // 删除 带头 结 点 的 双 链 循环 线性 表 工 的 第 i 个 元 素 ,i 的 合法 值 为 1<i< 表 长 ( 见 图 2-43) 


p 
头 结 点 1 四 | i itl 


(a) 初 态 ,p 指 向 第 i 个 结 点 


a [| SN = 
点 1 i-l i itl 
(b) 从 链表 中 删除 第 i 个 结 点 
图 2-43 删除 链表 L 的 第 i 个 结 点 


DuLinkList p; 
if(i<1) // i 值 不 合法 
return ERROR; // 删除 失败 
p= GetElemP(L,i); // 在 工 中 确定 第 并 个 元 素 的 位 置 指针 p 
if(1p) // p= NULL, 即 第 i 个 元 素 不 存在 
return ERROR; // 删除 失败 
e=p-data; // 将 第 二 个 元 素 的 值 赋 给 e 
p->>prior -next = pnext; // 第 i-1 个 结 点 的 后 继 指向 原 第 i+1 个 结 点 
Pp 一 next -二 prior =p- 二 prior; // 原 第 i+1 个 结 点 的 前 驱 指 向 第 -1 个 结 点 
free(p); // 释放 第 i 个 结 点 
return OK; // 删除 成 功 
} 
void ListTraverse(DuLinkList L.void(% visit) (ElemType)) 
{ // 由 双 链 循环 线性 表 工 的 头 结 点 出 发 . 正 序 对 每 个 数据 元 素 调用 函数 visit() 
DuLinkList p=L->>next; // p 指 向 首 元 结 点 
while(pl =L) // p 未 指向 头 结 点 
{ visit(p->data); // 对 p 所 指 结 点 调用 函数 visit() 
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p=p->next; // p 指 向 下 一 个 结 点 
} 
printf("\n"); 
} 
void ListTraverseBack(DuLinkList Lvvoid(# visit)(ElemType)) 
{ // 由 双 链 循环 线性 表 工 的 头 结 点 出 发 ,逆序 对 每 个 数据 元 素 调用 函数 visit()。 新 增 
DuLinkList p=L- 二 prior; // p 指 向 尾 结 点 
while(p! =IL) // p 未 指向 头 结 点 
{ visit(p- 二 data); // 对 p 所 指 结 点 调用 函数 visit() 
pP=p->prior; // p 指向 前 一 个 结 点 
} 
printf("\n"); 


// main2-6. cpp 检验 bo2-7.cpp 的 主 程序 
间 include"cl.h" 
typedef int ElemType; // 定义 ElemType 为 整 型 
间 include"c2-4.h" // 线性 表 的 双向 链表 存储 结构 
# include" bo2-7.cpp"// 带头 结 点 的 双向 循环 链表 存储 结构 的 基本 操作 (14 个 ) 
间 include"func2-2.cpp" // 包括 equal() .comp() .print() print1() 和 print2() 函 数 
void main( ) 
{ 
DuLinkList L; 
int i,n=4; 
Status j; 
ElemType e; 
InitList(L); // 初始 化 线性 表 工 
for(i=1l;i<=5;i++) // 依次 插入 1 一 5 
ListInsert(L,i,i); // 在 第 个 结 点 之 前 插入 i 
printf(" 逆 序 输出 链表 : "); 
ListTraverseBack(L,print); // 逆序 输出 
j= GetElem(L,2,e); // 将 链表 的 第 2 个 元 素 赋值 给 
if(j) 
printf(" 链 表 的 第 2 个 元 素 值 为 $d\n" ,e); 
else 
printf(" 不 存在 第 2 个 元 素 \n"); 
i= LocateElem(L,n,equal); 
if(i) 
printf(" 等 于 %d 的 元 素 是 第 sd 个 \n",n.i); 
else 
printf(" 没 有 等 于 %d 的 元 素 \n" ,n); 
j= PriorElem(L,n.e); 
if(j) 
printf("%d 的 前 驱 是 %d,",n.e); 


else 
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printf(" 不 存在 %d 的 前 驱 \n",n); 
j= NextElem(L,n,e); 
i£(j) 

printf("%d 的 后 继 是 %d\n" ,n,e); 
else 

printf(" 不 存在 %d 的 后 继 \n" ,n); 
ListDelete(L,2,e); // 删除 并 释放 第 2 个 结 点 
printf(" 删 除 第 2 个 结 点 , 值 为 %d, 其 余 结 点 为 ",e); 
ListTraverse(L,print); // 正 序 输出 
printf(" 链 表 的 元 素 个 数 为 %d," ,ListLength(L)); 
printf(" 链 表 是 否 空 ?%d(1: 是 0: 否 )\n" ,ListEmpty(L)); 
ClearList(L); // 清空 链表 
printf(" 清 空 后 ,链表 是 否 空 ?%d(1:; 是 0: 否 )\n" ,ListEmpty(L)); 
DestroyList(L); 

} 


程序 运行 结果 : 


线性 表 


逆序 输出 链表 : 54321 

链表 的 第 2 个 元 素 值 为 2 

等 于 4 的 元 素 是 第 4 个 

4 的 前 驱 是 3,4 的 后 继 是 5 

删除 第 2 个 结 点 , 值 为 2, 其 余 结 点 为 1345 
链表 的 元 素 个 数 为 4, 链 表 是 否 空 3 0(1: 是 0: 否 ) 
清空 后 ,链表 是 否 空 ? 1(1: 是 0: 否 ) 
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3.1 栈 


// c3-1.h 栈 的 顺序 存储 结构 。 在 教科 书 第 46 页 ( 见 图 3-1) SqStack 

间 define STACK_INIT_SIZE 10 // 存储 空间 初始 分 配 量 stacksize | SElemType 

间 define STACK_INCREMENT 2 // 存储 空间 分 配 增 量 top om) 

struct SqStack // 顺序 栈 | base el | 

{ SElemType * base; // 在 栈 构造 之 前 和 销毁 之 后 ,base 的 值 为 NULL SElemype 
SElemType * top; // 栈 顶 指针 图 3-1 顺序 栈 存 储 结构 


int stacksize; // 当前 已 分 配 的 存储 空间 ,以 元 素 为 单位 


}s 

// bo3-1. cpp 顺序 栈 (存储 结构 由 c3-1.h 定义 ) 的 基本 操作 (9 个 ) 

void InitStack( SqStack &S) 

{ // 构造 一 个 空 栈 S。 在 教科 书 第 47 页 ( 见 图 3-2) 
S.base = (SElemType * )malloc(STACK INIT SIZE x sizeof(SElemType)); 
if(!1S. base) 

exit(OVERFLOW) ; // 动态 分 配 存储 空间 失败 , 则 退出 [9] 

S.top = S. base; // 栈 顶 指向 栈 底 ( 空 栈 ) [8] 
S. stacksize = STACK_INIT_SIZE; // 存储 空间 为 初始 分 配 量 : 


1 
f 


Do i 
void DestroyStack( SqStack &S) CO 让 
{ // 销毁 栈 S.S 不 再 存在 ( 见 图 3-3) S 

free(S. base); // 释放 栈 空 间 图 3-2 ”构造 一 个 空 的 顺序 栈 S 

S.top = S.base=NULL; // 栈 顶 、 栈 底 指 针 均 为 空 

S. stacksize= 0; // 当前 已 分 配 的 存储 空间 为 0 


} 0 

void ClearStack( SqStack &S) NULL 

{ // 把 栈 s 置 为 空 栈 NULL 
S. top = S.base; // 栈 顶 指针 指向 栈 底 


} 图 3-3 销毁 顺序 栈 S 
Status StackEmpty( SqStack S) 
{ // 若 栈 $ 为 空 栈 , 则 返回 TRUE; 否则 返回 FALSE 


if(S. top == S. base) // 空 栈 条 件 
return TRUE; 
else 
return FALSE; 
} 
int StackLength(SqStack S) 
{ // 返回 栈 S 的 元 素 个 数 , 即 栈 的 长 度 
return S. top - S. base; 
} 


Status GetTop( SqStack S,SElemType &e) // 在 教科 书 第 47 页 
{ // 若 栈 S 不 空 , 则 用 e 返 回 S 的 栈 顶 元 素 , 并 返回 0K; 否则 返回 ERROR 


证 (S.top 二 S.base) // 栈 不 空 
{ e=x(S.top-1); // 将 栈 顶 元 素 赋 给 e 
return OK; 
} 
else 
return ERROR; 
} 
void Push( SqStack &S, SElemType e) 
{ // 插入 元 素 e 为 栈 S 新 的 栈 顶 元 素 。 
// 在 教科 书 第 47 页 ( 见 图 3-4) 
if(S.top - S. base == S. stacksize) // 栈 满 
{ S.base= (SElemType * )realloc(S. base, 
(S. stacksize + STACK_INCREMENT) 关 
sizeof(SElemType)); // 追加 存储 空间 
if(1S. base) // 追加 存储 空间 失败 , 则 退出 
exit(OVERFLON) ; 
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由 
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| 
Le 100 
s10 |[9] S10 
s9 |[8] S9 
S8 S8 
5s7 57 
S6 S6 
SS s5 
S4 S4 
10 53 12 S3 
于 s2 |[1] s2 
十 - sl | 一 一 ”| sl 
S S 
(a) 调用 PushO 之 前 。 (b) 调用 Push(O 之 后 


图 3-4 调用 Push() 示 例 


S.top = S.base+ S. stacksize; // 修改 栈 顶 指针 ,指向 新 的 栈 顶 
S. stacksize += STACK_INCREMENT; // 更 新 当前 已 分 配 的 存储 空间 


} 


* (S. top) ++= ei // 将 e 人 栈 , 成 为 新 的 栈 顶 元 素 , 栈 顶 指 针 上 移 1 个 存储 单元 


1 
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Status Pop(SqStack&S,SElemType &e) // 在 教科 书 第 47 页 
{ // 若 栈 Ss 不 空 , 则 删除 S 的 栈 顶 元 素 , 用 e 返 回 其 值 ， 

// 并 返回 OK; 否则 返回 ERROR( 见 图 3-5) 

证 (S.top == S. base) // 栈 空 

return ERROR; 
e=* 一 S.top; // 将 栈 顶 元 素 赋 给 e, 栈 项 指针 下 移 
// 1 个 存储 单元 

return OK; 
} 
void StackTraverse( SqStack S.void( * visit) (SElemType)) 
{ // 从 栈 底 到 栈 顶 依次 对 栈 S 中 每 个 元 素 调 用 函数 visit() 


[011] 
sll |[10] sll 
s10 S10 
s9 | 返回 参数 :| | s9 
s8_| e=sl1l S8 
S7 S7 
S6 s6 
SS SS 
S4 S4 
12 S3 12 S3 
= s2 |[1] S2 
十 -二 sl |[0] 二 一 一 sl 


(a) 调用 PopO 之 前 


(b) 调用 PopO 之 后 


图 3-5 调用 Pop() 示 例 
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while(S. top 二 S.base) // S.base 指向 栈 元 素 
visit( x* S.base++ ); // 对 该 栈 元 素 调用 visit()， 
printf("\n"); // 栈 底 指针 上 移 1 个 存储 单元 


// main3-1. cpp 检验 bo3-1. cpp 的 主 程序 
间 include"cl.h" 
typedef int SElemType; // 定义 栈 元 素 类 型 ,此 句 要 在 c3-1.h 的 前 面 
间 include"c3-1.h" // 栈 的 顺序 存储 结构 
间 include"bo3-1.cpp" // 顺序 栈 存 储 结构 的 基本 操作 (9 个 ) 
间 define ElemType SElemType // 将 func2-2.cpp 中 的 ElemType 类 型 定义 为 SElemType 类 型 
间 include"func2-2.cpp" // 包括 equal() .comp() .print() ,print1() 和 print2() 因 数 
void main() 
{ 
int j; 
SqStack s; 
SElemType e; 
InitStack(s); // 初始 化 栈 s 
for(j=1;j 一 = 12;j++ ) 
Push(s,j); // 将 值 为 j 的 栈 元 素 人 栈 s 中 
printf(" 栈 中 元 素 依次 为 "); 
StackTraverse(s,print); // 从 栈 底 到 栈 顶 依次 对 栈 s 中 每 个 元 素 调 用 print() 函 数 
Pop(s,e); // 弹出 栈 顶 元 素 ,其 值 赋 给 e 
printf(" 弹 出 的 栈 顶 元 素 e =%d\n" ,e); 
printf(" 栈 空 否 ?%d(1: 空 0: 否 ),",StackEmpty(s)); 
GetTop(s,e); // 将 新 的 栈 顶 元 素 赋 给 e 
printf(" 栈 顶 元 素 e=%d, 栈 的 长 度 为 %d\n" .e,StackLength(s)); 
ClearStack(s); // 清空 栈 s 
printf(" 清 空 栈 后 , 栈 空 否 ?%d(1: 空 0: 否 )\n",StackEmpty(s)); 
DestroyStack(s); // 销毁 栈 s 
printf(" 销 毁 栈 后 ,s. top =$%u,s.base =%u,s. stacksize =%dNn" ,s.top,s.base,s. stacksize); 
} 


程序 运行 结果 : 


栈 中 元 素 依 次 为 123456789101112 
弹出 的 栈 顶 元 素 e= 12 

栈 空 否 ? 0(1: 空 0: 否 ), 栈 顶 元 素 e= 11, 栈 的 长 度 为 11 
清空 栈 后 , 栈 空 否 ? 1(1: 空 0: 否 ) 

销毁 栈 后 ,s.top = 0.s.base= 0,s.stacksize=0 
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32 栈 的 应 用 举例 
32.1 数 制 转换 


// algo3-1. cpp 调用 算法 3.1 的 程序 
间 define N 8 // 定义 待 转换 的 进 制 NC2 一 9) 
typedef int SElemType; // 定义 栈 元 素 类 型 为 整 型 
间 include"cl.h" 
间 include"c3-1.h" // 采用 顺序 栈 
# include"bo3-1.cpp" // 利用 顺序 栈 的 基本 操作 
void conversion() // 算法 3.1 
// 对 于 输入 的 任意 一 个 非 负 十 进 制 整数 ,打印 输出 与 其 等 值 的 N 进 制 数 
SqStack s; 
unsigned n; // 非 负 整 数 
SElemType e; 
InitStack(s); // 初始 化 栈 
printf(" 将 十 进 制 整数 n 转换 为 %d 进 制 数 ,请 输入 : n( 三 0) =",N); 
scanf("%u",&n); // 输入 非 负 十 进 制 整数 n 
while(n) // 当 n 不 等 于 0 
{ Push(s,n%N); // 入 栈 n 除 以 N 的 余数 (N 进 制 的 低位 ) 
n=n/N; 


) 
[9] 
while( 1StackEmpty(s)) // 当 栈 不 空 [8] 
{ Pop(s,e); // 弹出 栈 顶 元 素 且 赋值 给 e 
printf("%d",e); // 输出 e 


printf("\n"); 
} 10 
void main() 


{ 一 一 | 


[1 
[0] 


soluld 


S 
conversion(); 


} 图 3-6 栈 s 在 元 素 最 


多 时 的 状态 


程序 运行 结果 ( 见 图 3-6) : 


运 
将 十 进 制 整数 n 转换 为 8 进 制 数 ,请 输入 : n( 宇 0) = 1348 这 
2504 


如 果 将 NN 定义 为 2,algo3-1. cpp 就 是 将 十 进 制 数 转换 为 二 进 制 数 的 程序 。 
程序 运行 结果 : 


将 十 进 制 整数 n 转换 为 2 进 制 数 , 请 输入 : n( 宇 0) = 13 
1101 


algo3-1. cpp 能 不 能 用 于 十 进 制 到 十 六 进 制 的 转换 呢 ? 存在 一 个 问题 ,要 将 余数 10 一 


数据 结构 算法 解析 


15 转换 为 A~F 输出 。algo3-2. cpp 实现 了 十 进 制 到 十 六 进 制 的 转换 。 


} 


// algo3-2. cpp 修改 算法 3.1, 十 进 制 ~ 十 六 进 制 
typedef int SElemType; // 定义 栈 元 素 类 型 为 整 型 
间 include"cl.h" 
间 include"c3-1.h" // 采用 顺序 栈 
间 include"bo3-1.cpp" // 利用 顺序 栈 的 基本 操作 
void conversion() 
{ // 对 于 输入 的 任意 一 个 非 负 十 进 制 整数 ,打印 输出 与 其 等 值 的 十 六 进 制 数 
SqStack s; 
unsigned n; // 非 负 整数 
SElemType e; 
InitStack(s); // 初始 化 栈 
printf(" 将 十 进 制 整数 n 转换 为 十 六 进 制 数 ,请 输入 : n( 宇 0) = "); 
scanf("%u",&n); // 输入 非 负 十 进 制 整数 n 
while(n) // 当 n 不 等 于 0 
{ Push(s,n%16); // 人 栈 n 除 以 16 的 余数 (十 六 进 制 的 低位 ) 
n=n/16; 
} 
while(1StackEmpty(s)) // 当 栈 不 空 
{ Pop(s,e); // 弹出 栈 顶 元 素 且 赋值 给 e 


if(e 一 = 9) 
printf("%d",e); // 小 于 等 于 9 的 余数 ,直接 输出 
else 


printf("%c" ,e+55); // 大 于 9 的 余数 ,输出 相应 的 字符 
} 
printf("\n"); 


void main() 


{ 


} 


程序 运行 结果 ( 见 图 3-7) : 


conversion(); 


10 
| 10 [1] 


| 4 |[O] 


将 十 进 制 整数 n 转换 为 十 六 进 制 数 ,请 输入 : n( 宇 0) = 164 


R4 
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行 编辑 程序 


// algo3-3. cpp 行 编辑 程序 ,实现 算法 3.2 
typedef char SElemType; // 定义 栈 元 素 类 型 为 字符 型 
间 include"ci.h" 


间 include"c3-1.h" // 栈 的 顺序 存储 结构 


图 3-7 栈 s 在 元 素 最 


多 时 的 状态 
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# include"bo3-1.cpp"// 顺序 栈 存储 结构 的 基本 操作 (9 个 ) 
FILE x fp; 
void copy(SElemType c) 
{ // 将 字符 c 送 至 fp 所 指 的 文件 中 
fputc(c,fp); 
} 
void LineEdit() 
{ // 利用 字符 栈 s, 从 终端 接收 一 行 并 送 至 调用 过 程 的 数据 区 。 算 法 3.2 
SqStack s; 
char ch; 
InitStack(s); // 初始 化 栈 s 
printf(" 请 输入 一 个 文本 文件 ,*2z 结束 输入 : \n"); 
ch = getchar(); // 接收 字符 到 ch 
while(ch! = EOF) // 当 全 文 未 结束 (EOF 为 之 键 , 全 文 结束 符 ) 
{ while(ch! = EOF&&chl = \n) // 当 全 文 未 结束 且 未 到 行 末 (不 是 换行 符 ) 
switch(ch) // 对 于 当前 字符 ch, 分 情况 处 理 
{ case '#':if (1!StackEmpty(s)) 
Pop(s,ch); // 仅 当 栈 非 空 时 弹出 栈 项 元 素 ,c 可 由 ch 替代 


break; 
case '@':ClearStack(s); // 重 置 s 为 空 栈 
break; 


default :Push(s,ch); // 其 他 字符 进 栈 
} 
ch = getchar(); // 从 终端 接收 下 一 个 字符 到 ch 
} // 到 行 末 或 全 文 结束 ,退出 此 层 循 环 


栈 和 队列 


StackTraverse(s,copy); // 将 从 栈 底 到 栈 顶 的 栈 内 字符 依次 传送 至 文件 (调用 copy() 函数) 


fputc(Nn',fp); // 向 文件 输入 一 个 换行 符 
ClearStack(s); // 重 置 s 为 空 栈 
让 (ch! = EOF) // 全 文 未 结束 
ch = getchar(); // 从 终端 接收 下 一 个 字符 到 ch 
} 
DestroyStack(s); // 销毁 栈 s 
} 
void main() 
{ 
fp = fopen("ed. txt","w"); 
// 在 当前 目录 下 建立 ed.txt 文件 ,用 于 写 数据 ,如 已 有 同名 文件 则 先 删 除 原文 件 
证 (fp) // 建立 文件 成 功 
{ Linegdit(); // 行 编辑 
fclose(fp); // 关闭 fp 所 指 的 文件 
} 
else 


printf(" 建 立 文件 失败 ! \n"); 


数据 结构 算法 解析 


程序 运行 结果 (以 教科 书 第 49 页 的 输入 为 例 ) : 


请 输入 一 个 文本 文件 ,之 结束 输入 : 
whli 提 间 ilr 提 e(s 提 x* s)w 


outcha@putchar( *s= ## ++ );y 


wd 


文件 ed. txt 的 内 容 : 


while( * s) 


putchar( * s++ ); 


323 迷宫 求解 


// algo3-4. cpp 利用 栈 求解 迷宫 问题 (只 输出 一 个 解 , 算 法 3.3) 
间 include"cl.h" 
struct PosType // 迷宫 坐标 位 置 类 型 ( 见 图 3-8) 


{ int x; // 行 值 PosType 
int y; // 列 值 Es 
上 
// 全 局 变量 图 3-8 PosType 结构 


PosType begin,end; // 迷宫 的 入 口 坐 标 ,出口 坐标 
PosType direc[4]= {{0,1),{1,0},{(0,—1),{—1,0)); 
// ( 行 增 量 , 列 增 量 ) ,移动 方向 依次 为 东南 西北 
间 define MAXLENGTH 25 // 设 迷宫 的 最 大 行列 为 25 
typedef int MazeType[MAXLENGTH][MAXLENGTH]; // 迷宫 数组 类 型 [ 行 ][ 列 ] 
MazeType m; // 迷宫 数组 
int x,y; // 迷宫 的 行 数 , 列 数 
void Print() 
{ // 输出 迷宫 的 解 (m 数组 ) 

int i,j; 

for(i=0;i<~x;i++) 

{ for(j= 0;j<y;j++) 

printf("%3d",m[i][j]); 
printf("\n"); 


} 

void Init() 

{ // 设 定 迷宫 布局 ( 墙 值 为 0, 通道 值 为 1) 
int i,j,xl,Y1; 
printf(" 请 输入 迷宫 的 行 数 , 列 数 (包括 外 墙 ): "); 
scanf("%d, %d".&x.&y); 
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for(i=0;i<y;i++) // 定义 周边 值 为 0( 外 墙 ? 
{ m[0J[i]=0; // 上 边 
m[x-1][ 训 =0; // 下 边 
} 
for(i=1;i<~x—-1;i++) 
{ m[ 订 [0] = 0; // 左边 
m[ij[y-1]=0; // 右边 
} 
for(i=1;i<x—-1;i++) 
for(j=1;j<y-1;j++) 
m[i][j] =1; // 定义 除外 墙 ,其 余 都 是 通道 , 初 值 为 1 
printf(" 请 输入 迷宫 内 墙 单元 数 : "); 
scanf("%d" ,&j); 
printf(" 请 依次 输入 迷宫 内 墙 每 个 单元 的 行 数 , 列 数 : \n"); 
for(i=1;i<=j;it+) 
{ scanf("%d, %d",&xl1,&y1); 
m[x1j[Ly1] = 0; // 修改 内 墙 的 值 为 0 
} 
printf(" 迷 宫 结构 如 下 : \n"); 
Print(); 
printf(" 请 输入 人 口 的 行 数 , 列 数 : ")， 
scanf("%d, %d",&begin. x,&begin. y); 
printf(" 请 输入 出 口 的 行 数 , 列 数 : "); 
scanf("%d, %d",&end. x,&end. y); 
} 
int curstep=1; // 当前 足迹 , 初 值 ( 在 人口 处 ) 为 1 
struct SElemType // 栈 的 元 素 类 型 。 在 教科 书 第 51 页 ( 见 图 3-9) SElemType 
{ int ord; // 通道 块 在 路 径 上 的 “序号 ” 
PosType seat; // 通道 块 在 迷宫 中 的 “坐标 位 置 ” 
int di; // 从 此 通道 块 走向 下 一 通道 块 的 * 方 向 ”"(0 一 3 表示 东 一 北 ) ”图 3-9 SElemType 结构 
}s 
间 include"c3-1.h" // 采用 顺序 栈 存 储 结构 
提 include"bo3-1.cpp" // 采用 顺序 栈 的 基本 操作 函数 
// 定义 墙 元 素 值 为 0, 可 通过 路 径 为 1, 经 试探 不 可 通过 路 径 为 -1, 通 过 路 径 为 足迹 
Status Pass(PosType b) 
{ // 当 迷 富 严 的 b 点 的 值 为 1( 可 通过 路 径 ) ,返回 OK; 否则 ,返回 ERROR 
if(m[b.x][b.y] ==1) 
return OK; 


ord |seat. x| seat, y| di 


else 
return ERROR; 

} 
void FootPrint(PosType b) 
{ // 使 迷宫 m 的 b 点 的 值 变 为 足迹 (curstep) 

m[b. x][b.y] = curstep; 
} 
void NextPos(PosType &b. int di) 
{ // 根据 当前 位 置 b 及 移动 方向 册 , 修 改 b 为 下 一 位 置 


数据 结构 算法 解析 


b.x+= direc[dil].x; 
b.y+= direc[di].y; 
} 
void MarkPrint (PosType b) 
{ // 使 迷宫 m 的 b 点 的 值 变 为 -1( 标 记 为 经 试探 由 此 不 能 到 达 终 点 的 路 径 ) 
m[b.xj[b.y]= -1; 
} 
Status MazePath(PosType start,PosType end) // 算法 3.3 
{ // 车 迷宫 m 中 存在 从 入 口 start 到 出 口 end 的 通道 , 则 求 得 一 条 存放 在 栈 中 (从 栈 底 到 栈 顶 )， 
// 并 返回 TRUE; 否则 返回 FALSE 
PosType curpos = start; // 当前 位 置 在 入 口 
SqStack S; // 顺序 栈 
SElemType e; // 栈 元 素 
InitStack(S); // 初始 化 栈 
do 
{ 证 (Pass(curpos)) // 当前 位 置 可 以 通过 , 即 是 未 曾 走 到 过 的 通道 块 
{ FootPrint(curpos); // 留 下 足迹 (使 迷宫 m 的 当前 位 置 的 值 为 curstep) 
e.ord = curstep; // 栈 元 素 的 序号 为 当前 足迹 curstep 
e. seat = curpos; // 栈 元 素 的 位 置 为 当前 位 置 
e.di=0; // 从 当前 位 置 出 发 ,下 一 位 置 是 向 东 
Push(S,e); // 人 栈 当前 位 置 及 状态 
curstep ++; // 足迹 加 1 
return TRUE; 
NextPos(curpos,e. di); // 由 当前 位 置 及 移动 方向 ,确定 下 一 个 当前 位 置 , 仍 赋 给 curpos 
} 
else // 当前 位 置 不 能 通过 
{ if(1StackEmpty(S)) // 栈 不 空 
{ Pop(S,e); // 退 栈 到 前 一 位 置 
curstep 一 ; // 足迹 减 1 
while(e. di == 3&&1StackEmpty(S)) // 前 一 位 置 处 于 最 后 一 个 方向 ( 北 ) 且 栈 不 空 
{ MarkPrint(e. seat); // 在 前 一 位 置 留 下 由 其 不 能 到 达 终 点 的 标记 (- 1) 
Pop(S,e); // 再 退回 一 步 
curstep --; // 足迹 再 减 1 
} 
if(e.di<3) // 未 到 最 后 一 个 方向 ( 北 ) 
{ e.di++; // 换 下 一 个 方向 探索 
Push(S,e); // 人 栈 该 位 置 的 下 一 个 方向 
curstep ++; // 足迹 加 1 
curpos = e. seat; // 确定 当前 位 置 
NextPos(curpos,e. di); // 由 当前 位 置 及 移动 方向 .确定 下 一 个 当前 位 置 , 仍 赋 给 curpos 
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}while( !StackEmpty(S)); 
return FALSE; 

} 

void main() 

{ 
Init(); // 初始 化 迷宫 
if(MazePath(begin,end)) // 有 通路 
{ printf(" 此 迷宫 从 入口 到 出 口 的 一 条 路 径 如 下 : \n"); 

Print(); // 输出 此 通路 (m 数组 ) 

} 
else 


printf(" 此 迷宫 没有 从 入 口 到 出 口 的 路 径 \n"); 


由 于 把 迷宫 数组 mm ,迷宫 的 行 数 x、 列 数 y、 迷 宫 的 入 口 坐标 begin 和 出 口 坐标 end 作为 
全 局 变量 ,它们 在 各 函数 中 都 通用 ,不 需要 用 形 参 来 传递 ,减少 了 Print() 函数 和 Init() 函数 
中 的 形 参数 量 。 

程序 运行 结果 (以 教科 书 图 3. 4 为 例 ) : 


请 输入 迷宫 的 行 数 , 列 数 (包括 外 墙 ): 10,10 
请 输入 迷宫 内 增 单 元 数 , 18 x 

请 依次 输入 迷宫 内 墙 每 个 单元 的 行 数 , 列 数 : 
3 

i 

2,3 

2,7y 
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请 输入 入 口 的 行 数 , 列 数 : 1,1 x 
请 输入 出 口 的 行 数 , 列 数 : 8,8 
此 迷宫 从 人 口 到 出 口 的 一 条 路 径 如 下 : 
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( 见 图 3-10) 


Soo Se Se © 


-| 07] 
1718|8| 东 | [16] 
1618|7| 东 
15 |8|6| 东 
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1 614| 东 
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[二 [2|?| 南 | 品 
二 =| 111|1| 东 | [0] 
S 
图 3-10 到 达 终 点 时 栈 S 的 内 容 


从 入口 到 出 口 的 一 条 路 径 由 全 局 变量 m 数组 显示 。 人 入口 的 值 为 1, 路径 的 值 依次 为 2， 


3,…,17。 图 3-10 显示 了 到 达 终 点 时 栈 的 内 容 。 其 中 栈 元 素 的 di 成 员 的 值 本 是 0 一 3 ,为 直 
观 , 用 东南 \ 西 . 北 代替 。 由 于 有 数组 m, 栈 的 主要 作用 并 不 是 保存 路 径 。 它 的 主要 作用 是 
当 试 探 失败 时 ,通过 退 栈 回 到 前 一 点 ,从 前 一 点 再 继续 试探 。 

这 条 路 径 共 走 了 16 步 ,从 入 口 ( 第 1 步 ) 到 第 5 步 其 实 只 须 走 2 步 。 原 因 是 func3-1. cpp 
中 定义 的 数组 direc[ 的 移动 方向 依次 为 东南 \ 西 , 北 。 程 序 由 人口 处 先 向 东 试探 。 既 然 有 路 ， 
就 不 再 向 南 试探 了 。 因 此 走 了 弯路 。 如 果 将 direcL0] 和 direc[1] 的 值 交换 一 下 ,新 的 移动 方向 
依次 为 南 、 东 、 西 , 北 。 这 样 ,程序 先 向 南 试探 ,只 在 不 成 功 时 才 向 东 试 探 。 避 免 了 在 此 处 走 弯 路 ， 
14 步 就 到 了 出 口 。 以 下 是 修改 了 direc[ ] 的 值 为 direc[4] 二 {{1,0),{0,1},{0, 一 1},{ 一 1,0}};”， 
不 改变 输入 数据 的 情况 下 的 运行 结果 。 为 节约 篇 幅 , 略 去 相同 部 分 ,只 列 出 最 后 结果 。 

程序 运行 结果 : 
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12 13 14 
0 0 0 


此 迷宫 从 人口 到 出 口 的 一 条 路 径 如 下 : 


-pro 


~ 
ou 


2 
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在 m 数 组 中 ,一 1 表示 曾 试探 过 ,但 不 能 通行 又 退回 去 的 路 径 ; 除 和 人口 以 外 ,1 表示 
没有 走 过 的 路 径 ; 大 于 1 的 值 表示 由 入 口 通 向 出 口 的 足迹 。 上 面 m 数组 第 5 步 的 下 面 有 
2 个 一 1。 它 们 的 值 本 是 1( 通 道 )。 当 走 到 第 5 步 时 ,入 栈 {5,5,1,0), 说 明 第 5 步 走 在 5 
行 1 列 , 且 下 一 步 是 向 南 走 。 向 南 走 是 通路 ,将 m 数组 6 行 1 列 的 值 改 为 6( 留 下 足迹 )， 
入 栈 {6,6,1,0) ,当前 足迹 curstep 加 1 为 7。 说 明 第 6 步 走 在 6 行 1 列 , 且 下 一 步 也 是 向 
南 走 。 还 是 通路 ,将 m 数 组 7 行 1 列 的 值 改 为 7( 将 curstep 赋 给 mL[7][1]), 入 栈 {7,7,1,0}, 当 
前 足迹 curstep 加 1 为 8。 说 明 第 7 步 走 在 7 行 1 列 , 且 下 一 步 也 是 向 南 走 。 这 时 不 再 是 通 
路 ,出 栈 {7,7,1,0}。 改 变 方 向 ,入 栈 {7,7,1,1}。 说 明 第 7 步 仍 是 走 在 7 行 1 列 ,下 一 步 改 
为 向 东 走 。 依 然 没 有 通路 。7 行 1 列 的 4 个 方向 上 都 不 是 1( 走 投 无 路 )。 最 后 ,将 m 数组 7 
行 1 列 的 值 改 为 一 1, 出 栈 {7,7,1,3) ,当前 足迹 curstep 减 1 为 6。 再 出 栈 {6,6,1,0}。 改 变 
方向 ,入 栈 {6,6,1,1)。6 行 1 列 的 4 个 方向 上 也 都 不 是 1。 最 后 ,将 m 数组 6 行 1 列 的 值 改 
为 一 1, 出 栈 {6,6,1,3), 当 前 足迹 curstep 减 1 为 5。 再 出 栈 {5,5,1,0)。 改 变 方 向 ,入 栈 
{5,5,1,1}。 向 第 5 步 的 东 面 试探 第 6 步 ,…… ,直到 终点 或 没有 通路 。 


324 表达 式 求 值 


// func3-1. cpp algo3-5. cpp 和 algo3-6. cpp 要 调用 的 函数 
char Precede(SElemType t1,SElemType t2) 
{ // 根据 教科 书 表 3.1, 判 断 tl,t2 两 符号 的 优先 关系 (' 井 用 Nm 代替) 
Char f; 
Switch(t2) 
{ case '+ 
case '- ':if(tl =='(||tl == Nn) 
f='<'; // ti<t2 
else 
f= 全 3 // tl 二 t2 
break; 
Case '*': 
case /' :if(t1l=="'x'||t1l=="/"||t1 ==")") 
fa /> 


else 
f='<'; // ti<t2 

break; 

case '(' :if(tl ==")") 

{ printf(" 括 号 不 匹配 \n"); 
exit(OVERFLOW) ; 

} 

else 
上 = "~"; // ti<t2 

break; 


case )' :Switch(t1) 


{ case '(':f='=';// tl=t2 
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break; 

case \n':printf(" 缺 乏 左 括号 \n"); 
exit(OVERFLOW) ; 

default :f=">'; // ti>t2 


} 
上 


break; 
case\n' ;switch(t1) 
{ case Mm':f='="';//tl=t2 
break; 
case “('; printf(" 缺 乏 右 括号 \n"); 
exit(OVERFLOW) ; 
default :上 = >"'; // tl 二 t2 


} 
return f; 


1 


Status In(SElemType c) 
{ // 判断 c 是 否 为 7 种 运算 符 之 一 
switch(c) 
{ case '+ ': 
case ' 一 ': 
Case '*': 
case /" : 
case '(' : 
case )' : 
case\n' :return TRUE; 


default :return FALSE; 


} 
SElemType Operate( SElemType a,SElemType theta,SElemType b) 
{ // 做 四 则 运算 a theta b, 返 回 运 算 结 果 
switch( theta) 
{ case'+ ':return a+ bi 
case'— ':return aa 一 b; 
Case'* ':return ax b; 
} 


return a/b; 


// algo3-5. cpp 表达 式 求 值 ( 输 入 的 值 在 0 一 9 之 间 , 中 间 结 果 和 输出 的 值 在 - 128 一 127 之 间 )， 
// 算法 3.4 

typedef char SElemType; // 定义 栈 元 素 为 字符 型 

间 include"cl.h" 

并 include"c3-1.h"” // 栈 的 顺序 存储 结构 


栈 和 队列 


小 
Ww 
几 


间 include"bo3-1.cpp" // 顺序 栈 存 储 结构 的 基本 操作 (9 个 ) 

# include"func3-1. cpp" // 包括 Precede() .In() 和 Operate() 函 数 

SElemType EvaluateExpression() // 算法 3.4. 有 改动 

{ // 算术 表达 式 求 值 的 算 符 优先 算法 。 设 OPTR 和 OPND 分 别 为 运算 符 栈 和 运算 数 栈 


} 


SqStack OPTR,., OPND; 
SElemType a,b,c,x; 
InitStack(OPTR); // 初始 化 运算 符 栈 OPTR 和 运算 数 栈 OPND 
InitStack(OPND); 
Push(OPTR,Nn); // 将 换行 符 压 和 人 运算 符 栈 OPTR 的 栈 底 。 修 改 
c= getchar(); // 由 键盘 读 入 1 个 字符 到 c 
GetTop(OPTR,x); // 将 运算 符 栈 OPTR 的 栈 顶 元 素 赋 给 x 
while(c! =\n'||x! = NAn) // c 和 x 不 都 是 换行 符 
{ (In(c)) // c 是 7 种 运算 符 之 一 
switch(Precede(x,c)) // 判断 x 和 c 的 优先 权 
{ case'<':Push(OPTR,c); // 运算 符 栈 OPTR 的 栈 顶 元 素 x 的 优先 权 低 ,入 栈 c 
c= getchar(); // 由 键盘 读 人 下 一 个 字符 到 c 
break; 
case'= ':Pop(OPTR,x); // x="(' 且 c=") 情况 ,弹出 "(给 x( 后 又 扔 掉 ) 
c= getchar(); // 由 键盘 读 入 下 一 个 字符 到 c( 扔 掉 c 原 有 的 ?7 
break; 
case 一 ':Pop(OPTR,x); // 栈 顶 元 素 x 的 优先 权 高 ,弹出 运算 符 栈 OPTR 的 栈 顶 元 素 给 x。 修 改 
Pop(OPND,b); // 依次 弹出 运算 数 栈 OPND 的 栈 顶 元 素 给 b,a 
Pop(OPND,a); 
Push(OPND,Operate(a,x,b)); // 做 运算 a x b, 并 将 运算 结果 入 运算 数 栈 
} 
else if(c 二 = 0&&c 一 = 9) // c 是 操作 数 
{ Push(OPND,c- 48); // 将 该 操作 数 的 值 (不 是 ASCII 码 ) 压 人 运算 数 栈 OPND 
c= getchar(); // 由 键盘 读 入 下 一 个 字符 到 c 
} 
else // c 是 非法 字符 
{ printf(" 出 现 非法 字符 \n"); 
exit(OVERFLONW) ; 
} 
GetTop(OPTR,x); // 将 运算 符 栈 OPTR 的 栈 顶 元 素 赋 给 x 
} 
Pop(OPND,x); // 弹出 运算 数 栈 OPND 的 栈 顶 元 素 (运算 结果 ) 给 x( 修 改 此 处 ) 
if(1StackEmpty(OPND)) // 运算 数 栈 OPND 不 空 (运算 符 栈 OPTR 仅 剩 \n') 
{ printf(" 表 达 式 不 正确 \n"); 
exit( OVERFLOW) ; 
} 


return x; 


void main() 


{ 


printf(" 请 输入 算术 表达 式 ( 输 入 的 值 要 在 0 一 9 之 间 、"); 
printf(" 中 间 运 算 值 和 输出 结果 在 - 128 一 127 之 间 )\n"); 
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printf("%d\n" ,EvaluateExpression()); // 返回 值 (8 位 二 进 制 ,1 个 字 节 ) 按 整 型 格式 输出 
} 


程序 运行 结果 (以 教科 书 例 3-1 为 例 ) : 


请 输入 算术 表达 式 (输入 的 值 要 在 0 一 9 之 间 、 中 间 运 算 值 和 输出 结果 在 - 128 一 127 之 间 ) 
awAT=2) 
15 


algo3-6. cpp 对 algo3-5. cpp 做 了 些 改进 ,把 连续 输入 的 几 个 数值 型 字符 作为 一 个 整数 
处 理 。 使 数值 范围 扩大 为 整 型 ,更 具有 实用 性 。 因 为 只 包括 四 则 运算 符 , 故 负数 要 用 (0 一 正 
数 ) 表 示 。 


// algo3-6. cpp 表达 式 求 值 (范围 为 int 类 型 ,输入 负数 要 用 (0 - 正 数 ) 表 示 ) 
typedef int SElemType; // 定义 栈 元 素 类 型 为 整 型 ,修改 algo3-5. cpp 
间 include"cl.h" 
间 include"c3-1.h" // 顺序 栈 的 存储 结构 
间 include"bo3-1.cpp"// 顺序 栈 的 基本 操作 
# include" func3-1. cpp" // 包括 Precede() .In() 和 Operate() 函 数 
SElemType EvaluateExpression() 
{ // 算术 表达 式 求 值 的 算 符 优先 算法 。 设 OPTR 和 OPND 分 别 为 运算 符 栈 和 运算 数 栈 
SqStack OPTR,OPND; 
SElemType a,b,d,x; // 修改 algo3-5. cpp 
char c; // 存放 由 键盘 接收 的 字符 ,修改 algo3-5. cpp 
InitStack(OPTR); // 初始 化 运算 符 栈 OPTR 和 运算 数 栈 OPND 
InitStack(OPND) ; 
Push(OPTR,Nn); // 将 换行 符 压 人 运算 符 栈 OPTR 的 栈 底 。 修 改 
c= getchar(); // 由 键盘 读 人 1 个 字符 到 c 
GetTop(OPTR,x); // 将 运算 符 栈 OPTR 的 栈 顶 元 素 赋 给 x 
while(c! = An||x! = Nn) // c 和 x 不 都 是 换行 符 
{ 证 (In(c)) // c 是 7 种 运算 符 之 一 
switch(Precede(x,c)) // 判断 x 和 c 的 优先 权 
{ case' 一 ':Push(OPTR,c); // 运算 符 栈 OPTR 的 栈 顶 元 素 x 的 优先 权 低 ,入 栈 c 
c= getchar(); // 由 键盘 读 人 下 一 个 字符 到 c 
break; 
case'= ':Pop(OPTR,x); // x="(' 目 c=) 情况 ,弹出 "(给 x( 后 又 扔 掉 ) 
c= getchar(); // 由 键盘 读 人 下 一 个 字符 到 c( 扔 掉 c 原 有 的 77 
break; 
case 一 ':Pop(OPTR,x); // 栈 顶 元 素 x 的 优先 权 高 .弹出 运算 符 栈 OPTR 的 栈 顶 元 素 给 x。 修 改 
Pop(OPND,b) ; // 依次 弹出 运算 数 栈 OPND 的 栈 顶 元 素 给 b.a 
Pop(OPND,a); 
Push(OPND,Operate(a,x,b)); // 做 运算 a x b, 并 将 运算 结果 入 运算 数 栈 


} 
else 庄 (c>= 0S&&c<= 9) // c 是 操作 数 ,此 语句 修改 algo3-5. cpp 
{d=0; 
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while(c 二 = 0S&&c< 一 = 9) // 是 连续 数字 
{d=dx*x10+c—'0'; 
c= getchar(); 
} 
Push(OPND,d); // 将 d 压 人 运算 数 栈 OPND 
} 
else // c 是 非法 字符 ,以 下 同 algo3-5. cpp 
{ printf(" 出 现 非法 字符 \n"); 
exit(OVERFLOW) ; 
} 
GetTop(OPTR,x); // 将 运算 符 栈 OPTR 的 栈 顶 元 素 赋 给 x 
} 
Pop(OPND,x); // 弹出 运算 数 栈 OPND 的 栈 顶 元 素 (运算 结果 ) 给 x( 修 改 此 处 ) 
if(1StackEmpty(OPND)) // 运算 数 栈 OPND 不 空 (运算 符 栈 OPTR 仅 剩 \n”) 
{ printf(" 表 达 式 不 正确 \n"); 
exit(OVERFLOW) ; 
} 
return x; 
} 
void main() 
{ 
printf(" 请 输入 算术 表达 式 ,负数 要 用 (0 一 正 数 ) 表 示 \n"); 
printf("%d\n" ,EvaluateExpression()); 
} 


程序 运行 结果 : 


请 输入 算术 表达 式 , 负 数 要 用 (0- 正 数 ) 表 示 
(0—12) * ((5— 3)*3+2)/(2+2)w 
二 24 


33 栈 与 递归 的 实现 


函数 中 有 直接 或 间接 地 调用 自身 函数 的 语句 ,这 样 的 函数 称 为 递归 函数 。 递 归 函 数 用 
得 好 ,可 简化 编程 工作 。 但 函数 自己 调用 自己 .有 可 能 造成 死 循 环 。 为 了 避免 死 循 环 ,要 做 
到 两 点 : 

(1) 降 阶 。 递 归 函 数 虽 然 调用 自身 ,但 并 不 是 简单 地 重复 。 它 的 实 参 值 每 次 是 不 一 样 的 。 
一 般 逐 渐 减 小 , 称 为 降 阶 。 如 教科 书 式 (3-3) 的 Ackerman 函数 , 当 m 天 0 时 , 求 Ack(m,n) 可 由 
Ack(Cm 一 1,…) 得 到 ,Ack() 函 数 的 第 1 个 参数 减 小 了 。 

(2) 有 出 口 。 即 在 某 种 条 件 下 ,不 再 进行 递归 调用 。 仍 以 教科 书 式 (3-3) 的 Ackerman 
函数 为 例 , 当 m 二 0 时 ,Ack(0,n) 二 n 十 1, 终 止 了 递归 调用 。 所 以 ,递归 函数 总 有 条 件 语 句 。 
m 王 0 的 条 件 是 由 逐渐 降 阶 形成 的 。 如 取 Ack(m.n) 函 数 的 实 参 m= 二 一 1, 即 使 通过 降 阶 也 
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会 出 现 m 二 0 的 情况 ,这 也 会 造成 死 循 环 。 

系统 在 遇 到 函数 调用 时 ,会 将 调用 函数 的 实 参 、 返 回 地 址 等 信息 存 人 系统 自身 设立 的 “ 递 
归 工 作 栈 ”中 ,再 去 运行 被 调 函 数 。 从 被 调 函 数 返 回 时 ,再 将 调用 函数 的 信息 出 栈 , 接 着 运行 调 
用 函数 。 在 一 系列 递归 调用 过 程 中 ,最 后 递归 调用 的 函数 最 先 结束 调用 返回 主 调 函 数 。 所 
以 把 它们 的 信息 存 人 栈 中 是 很 合适 的 。 系 统 开辟 的 栈 空间 是 有 限 的 , 当 递归 调用 时 , 幅 套 的 
层次 往往 很 多 ,就 有 可 能 使 栈 发 生 溢 出 现象 ,从 而 出 现 不 可 预料 的 后 果 。 运 行 algo3-7. cpp 
时 ,mn 的 取 值 就 不 可 过 大 。 

// algo3-7. cpp 用 递归 调用 求 Ackerman(m.n) 的 值 

# include 一 stdio.h 二 


int ack(int m,int n) 


{ int z; 
if(m== 0) 
z=n+1; // 出 口 
else if(n== 0) 
z=ack(m 一 1,1); // 对 形 参 m 降 阶 
else 
z= ack(m- 1,ackCm',n- 1)); // 对 形 参 m.n 降 阶 
return 2z; 
} 
void main() 
{ 
int m,n; 
printf(" 请 输入 m,n: "); 
scanf("%d, %d",&m,&n); 
printf("Ack(%d, %d) =%d\n" ,m,n.ack(m,.n)); 
} 


程序 运行 结果 (mn 不 可 取 值 过 大 ): 


请 输入 m,n: 3,9 ww 
Ack(3,9) = 4093 


// algo3-8. cpp Hanoi 塔 问题 ,调用 算法 3.5 的 程序 
间 include<stdio.h> 
int c= 0; // 全 局 变量 , 搬 动 次 数 
void move(char x,int n,char z) 
{ // 第 na 个 圆 盘 从 塔 座 x 搬 到 塔 座 = 
printf(" 第 $i 步 : 将 $%$i 号 盘 从 gc 移 到 $cNn" ,++ cn,xyz); 
} 
void hanoi(int n.char x.char Y,char z) // 算法 3.5 
{ // 将 塔 座 x 上 按 直径 由 小 到 大 且 自 上 而 下 编号 为 1 至 n 的 nn 个 圆 盘 
// 按 规则 搬 到 塔 座 z 上 。y 可 用 作 辅 助 塔 座 
if(n==1) // (出 口 ) 
move(x,1,z); // 将 编号 为 1 的 圆 盘 从 x 移 到 z 
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else 
{ hanoi(n- 1,x,z,yY); // 将 x 上 编号 为 1 至 n-1 的 圆 盘 移 到 y,z 作 辅助 塔 ( 降 阶 递归 调用 ) 
move(x,n,z); // 将 编号 为 n 的 圆 盘 从 x 移 到 z 
hanoi(n 一 1,y,x,z); // 将 Y 上 编号 为 1 至 n-1 的 圆 盘 移 到 z,x 作 辅助 塔 ( 降 阶 递归 调用 ) 
} 
} 
void main() 
{ 
int n; 
printf("3 个 塔 座 为 ab.c, 圆 盘 最 初 在 a 座 ,借助 b 座 移 到 c 座 。 请 输入 圆 盘 数 : "); 
scanf("%d",&n); 
hanoi(n,'a',b','c'"); 


} 


程序 运行 结果 : 


3 个 塔 座 为 a\b\c, 圆 盘 最 初 在 a 座 ,借助 b 座 移 到 c 座 。 请 输入 圆 盘 数 : 3 x 
第 1 步 : 将 1 号 盘 从 a 移 到 c 
第 2 步 : 将 2 号 盘 从 a 移 到 b 
第 3 步 : 将 1 号 盘 从 c 移 到 b 
第 4 步 : 将 3 号 盘 从 a 移 到 c 
第 5 步 : 将 1 号 盘 从 b 移 到 a 
第 6 步 : 将 2 号 盘 从 b 移 到 < 
第 7 步 : 将 1 号 盘 从 a 移 到 < 
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341 链 队列 一 一 队列 的 链 式 表示 和 实现 QuouePe. CQNode QNode 


一 | data | nextf—™ 1 1 


// c3-2.h 单 链 队列 - 队列 的 链 式 存储 结构 。 在 教科 书 第 61 页 图 3-11 单 链 队列 的 结 点 类 型 
typedef struct QNode // ( 见 图 3-11) 


{ QElenType data; LinkQueue 
. front| rear 
QNode * next; | 
} * QueuePtr; 下 二 
struct LinkQueue // ( 见 图 3-12) EE Ug gp gp 


QNode QNode 
图 3-12 LinkQueue 类 型 


{ QueuePtr front,rear; // 队 头 、 队 尾 指 针 


}s 

和 栈 一 样 ,队列 也 是 操作 受 限 的 线性 表 ， 只 允许 LinkQueue 
在 队 尾 插入 元 素 , 在 队 头 删除 元 素 。 对 于 链 队 列 结 区 
构 , 为 了 便于 插入 元 素 , 设 立 了 队 尾 指针 。 这 样 ,插入 


元 素 的 操作 与 队列 长 度 无 关 。 图 3-13 是 具有 2 个 元 国 岂 十 [4| 二 [7 ud 


素 的 链 队 列 示例 。 图 3-13 具有 2 个 元 素 (4,7) 的 链 队 列 


局 数据 结构 算法 解析 


// bo3-2. cpp 链 队列 (存储 结构 由 c3-2.h 定义 ) 的 基本 操作 (9 个 ) 
void InitQueue(LinkQueue £0) 
{ // 构造 一 个 空 队列 0。 在 教科 书 第 62 页 ( 见 图 3-14) 


Q. front = 0. rear = (QueuePtr)malloc(sizeof(QNode)); // 生成 头 结 点 Q 
证 (!0. front) // 生成 头 结 点 失败 | 
exit(OVERFLOW) ; | 1 
Q. front ->>next = NULL; // 头 结 点 的 next 域 为 空 uu 
} 图 3-14 空 队 列 Q 
void DestroyQueue(LinkQueue &0) 
{ // 销毁 队列 8( 无 论 空 耕 均 可 )。 在 教科 书 第 62 页 ( 见 图 3-15) 
while(0. front) // 0. front 不 为 空 Q 
{ Q. rear = 0. front -二 next; // Q. rear 指向 0. front 的 下 一 个 结 点 NULLTNULL 
free(Q. front); // 释放 0. front 所 指 结 点 
0Q.front = 0.rear; // Q.front 指向 0. front 的 下 一 个 结 点 图 3-15 销毁 后 的 队列 Q 


} 

void ClearQueue( LinkQueue £0) 

{ // 将 队列 8 清 为 空 队列 ( 见 图 3-14) 
DestroyQueue(0); // 销毁 队列 Q( 见 图 3-15) 
InitQueue(0); // 重新 构造 空 队列 Q 

} 

Status QueueEmpty(LinkQueue 0) 

{ // 若 队列 8 为 空 队列 , 则 返回 TRUE; 否则 返回 FALSE 
if(Q. front ->next == NULL) 

return TRUE; 
else 
return FALSE; 

} 

int QueueLength( LinkQueue 0) 

{ // 求 队列 8 的 长 度 
int i= 0; // 计数 器 , 初 值 为 0 
QueuePtr p= 0.front; // p 指 向 头 结 点 
while(Q. rearl =p) // p 所 指 不 是 尾 结 点 
{ 主 村 3 // 计数 器 +1 

p=p->next; // p 指 向 下 一 个 结 点 
} 
return i; 


} 
上 


Status GetHead(LinkQueue Q.QElemType &e) 
{ // 若 队列 9 不 室 , 则 用 e 返 回 0 的 队 头 元 素 ,并 返回 OK; 否则 返回 ERROR 
QueuePtr p; 
证 (0. front == 0.rear) // 队列 空 
return ERROR; 
p=Q.front -二 next; // p 指 向 队 头 结 点 
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e=p->data; // 将 队 头 元 素 的 值 赋 给 e 
return OK; 
} 
void EnQueue(LinkQueue &0.,QElemType e) 
// 插入 元 素 e 为 队列 8 的 新 的 队 尾 元 素 。 在 教科 书 第 62 页 ( 见 图 3-16) 
QueuePtr p; 
p= (QueuePtr)malloc(sizeof(QNode)); // 动态 生成 新 结 点 
if(!p) 
exit(OVERFLOW) ; // 失败 则 退出 
p -data= e; // 将 值 e 赋 给 新 结 点 
p->next=NULL; // 新 结 点 的 指针 域 为 空 
Q.rear -next =p; // 原 队 尾 结 点 的 指针 指向 新 结 点 
Q. rear = p; // 尾 指针 指向 新 结 点 
} 


(a) p 生 成 队 尾 结 点 (b) 将 队 尾 结 点 插入 队列 
图 3-16 ”在 队列 Q 的 尾部 插入 元 素 e 
Status DeQueue(LinkQueue &Q ,0ElemTYPe &e) 


{ // 阁 队 列 0 不 空 , 删 除 8 的 队 头 元 素 , 用 e 返回 其 值 ， 
// 并 返回 OK; 否则 返回 ERROR。 在 教科 书 第 62 页 ( 见 图 3-17) 


Q Q 


| 二- [1 Nuid 寺 =| | 十- … INULL| 
p p 

(a) p 指 向 队列 Q 的 第 1 个 结 点 (b) 队列 Q 头 结 点 的 指针 域 指向 第 2 个 结 点 
图 3-17 删除 队列 Q 的 第 1 个 元 素 


CH 


QueuePtr p; 
if(Q. front == Q. rear) // 队列 空 
return ERROR; 


p=Q.front -二 next; // p 指 向 队 头 结 点 
e=p->data; // 将 队 头 元 素 的 值 赋 给 e 
Q. front -二 next =p-next; // 头 结 点 指向 下 一 个 结 点 
if(Q. rear == p) // 删除 的 是 队 尾 结 点 

0.rear = 0.front; // 修改 队 尾 指 针 指向 头 结 点 ( 空 队列 ) 
free(p); // 释放 队 头 结 点 
return OK; 


a 数据 结构 算法 解析 


void QueueTraverse(LinkQueue Q.void(% visit)(QElemType)) 

// 从 队 头 到 队 尾 依次 对 队列 9 中 每 个 元 素 调用 函数 visit() 

QueuePtr p= 0. front -二 next; // p 指 向 队 头 结 点 

while(p) // p 指向 结 点 

{ visit(p- 二 data); // 对 p 所 指 元 素 调用 visit() 
p=p->next; // p 指 向 下 一 个 结 点 

} 

printf("\n"); 


// func3-2. cpp 链 队列 的 主 函 数 ,main3-2. cpp 和 main3-3.cpp 调用 
void main( ) 
{《 
int i; 
QElemType d; 
LinkQueue q; 
InitQueue(q); // 构造 空 队 列 q, 失 败 则 退出 
printf(" 成 功 地 构造 了 一 个 空 队列 \n")， 
printf(" 是 否 空 队 列 ?%d(1: 空 0: 否 )," ,QueueEmpty(q) ); 
printf(" 队 列 的 长 度 为 %d\n" ,QueueLength(q)); 
EnQueue(q, - 5); // 依次 入 队 3 个 元 素 
EnQueue(q,5); 
EnQueue(q,10); 
printf(" 插 入 3 个 元 素 ( -5,5,10) 后 ,队列 的 长 度 为 %d\n" ,QueueLength(q)); 
printf(" 是 否 空 队列 ?%d(1: 空 0: 否 ),",QueueEmpty(q)); 
printf(" 队 列 的 元 素 依 次 为 "); 
QueueTraverse(q,print); // 从 队 头 到 队 尾 依次 对 队列 q 中 每 个 元 素 调用 函数 print() 
i= GetHead(q,d); // 将 队 头 元 素 赋 给 d 
证 (i== OK) // 队列 q 不 空 
printf(" 队 头 元 素 是 sd ",.d); 
DeQueue(q,d) ; // 删除 队 头 元 素 , 其 值 赋 给 d 
printf(" 删 除了 队 头 元 素 %d," .dd)， 
i= GetHead(q,d); // 将 队列 q 的 队 头 元 素 赋 给 d 
if(i== OK) // 队列 q 不 空 
printf(" 新 的 队 头 元 素 是 d\n" ,d); 
ClearQueue(q) ; // 清空 队列 q 
printf(" 清 空 队列 后 ,q. front =%u,q. rear =%u,q. front ->>next =%u\n" ,q. front, 
q. rear,q. front ~-~>next); 
DestroyQueue(q) ; // 销 筑 队列 q 
printf(" 销 毁 队 列 后 ,q. front =%u,q. rear =%u\n" ,q. front,q. rear); 


// main3-2. cpp 检验 bo3-2. cpp 的 主 程序 
间 include"ci.h" 


第 3 章 ” 栈 和 队列 


typedef int QElemType; // 定义 队列 元 素 为 整 型 

间 include"c3-2.h" // 队列 的 链 式 存储 结构 

间 include"bo3-2.cpp" // 链 队 列 存储 结构 的 基本 操作 (9 个 ) 

提 define ElemType QElemType // 将 func2-2.cpp 中 的 ElemType 类 型 定义 为 QElemType 类 型 
间 include"func2-2.cpp" // 包括 equal() .comp() .print() ,print1() 和 print2() 滑 数 

间 include"func3-2.cpp" // 主 函 数 


程序 运行 结果 : 


成 功 地 构造 了 一 个 空 队列 

是 否 空 队列 ? 1(1: 空 0: 和 否 ) ,队列 的 长 度 为 0 

插入 3 个 元 素 (- 5,5,10) 后 ,队列 的 长 度 为 3 

是 否 空 队列 ? 0(1: 空 0: 和 否 ), 队 列 的 元 素 依次 为 -5 5 10 

队 头 元 素 是 - 5, 删 除了 队 头 元 素 - 5, 新 的 队 头 元 素 是 5 

清空 队列 后 ,q. front = 2228,q. rear = 2228.q. front -二 next = 0 
销毁 队列 后 ,q.front = 0,q.rear=0 


由 c3-2.h 和 c2-2.h 对 比 可 见 , 单 链 队列 和 单 链表 的 结构 有 相同 之 处 。 单 链 队 列 也 是 带 
有 头 结 点 的 单 链 表 , 它 的 队 头 指针 相当 于 单 链表 的 头 指针 。 因 为 队列 操作 是 线性 表 操 作 的 
子 集 , 所 以 bo3-2. cpp 中 的 基本 操作 也 可 以 用 单 链表 的 基本 操作 来 代替 。 这 样 既 可 以 充分 
利用 现 有 资源 , 减 小 编程 工作 量 , 又 可 以 更 清楚 地 看 出 队列 和 线性 表 的 内 在 联系 和 共性 。 
bo3-3. cpp 是 利用 单 链表 的 基本 操作 实现 单 链 队 列 基本 操作 的 程序 。 

单 链 队列 和 单 链表 的 结构 并 不 完全 相同 ,因此 只 能 是 在 单 链 队 列 的 基本 操作 中 调用 单 
链表 的 基本 操作 。 


// bo3-3.cpp 用 单 链表 的 基本 操作 实现 链 队 列 (存储 结构 由 c3-2.h 定义 ) 的 基本 操作 (9 个 ) 

typedef QElemType ElemType; // 定义 单 链表 的 元 素 类 型 为 队列 的 元 素 类 型 

提 define LinkList QueuePtr // 定义 单 链表 的 类 型 为 相应 的 链 队列 的 类 型 

间 define LNode ONode 

# 井 include" bo2-2. cpp"// 单 链表 的 基本 操作 

void InitQueue(LinkQueue &Q) 

{ // 构造 一 个 空 队列 Q 
InitList(Q. front); // 以 0.front 为 头 指 针 , 构 造 空 链表 (调用 单 链表 的 基本 操作 ) 
Q. rear = 0.front; // Q. rear 与 0.front 共同 指向 链 队 列 的 头 结 点 

} 

void DestroyQueue(LinkQueue &0) 

{ // 销毁 队列 Q( 无 论 空 否 均 可 ) 
DestroyList(Q. front); // 销毁 0. front 为 头 指针 的 链表 , 且 置 0. front 为 空 
Q.rear = 0.front; // 置 Q.rear 也 为 空 

} 

void ClearQueue( LinkQueue &0) 

{ // 将 队列 @ 清 为 空 队列 
ClearList(Q. front); // 清空 以 Q. front 为 头 指针 的 链表 , 头 结 点 的 指针 域 为 空 
Q.rear = 0.front; // 0.rear 也 指向 空 队列 的 头 结 点 

} 


数据 结构 算法 解析 


Status QueueEmpty(LinkQueue 0) 
{ // 车 队列 0 为 空 队列 , 则 返回 TRUE; 否则 返回 FALSE 
return ListEmpty(Q. front); // 以 0.front 为 头 指针 的 单 链表 为 空 , 则 队列 8 为 空 ,反之 亦 然 
} 
int QueueLength(LinkQueue 0) 
{ // 求 队列 @ 的 长 度 
return ListLength(Q. front); // 队列 0 的 长 度 即 为 以 0. front 为 头 指 针 的 单 链表 的 长 度 
} 
Status GetHead(LinkQueue 0.0ElemTYPe &e) 
{ // 若 队列 9 不 空 , 则 用 e 返 回 @ 的 队 头 元 素 ,并 返回 OK; 否则 返回 ERROR 
return GetElem(Q. front,1,e); // 队 头 元 素 即 为 以 Q.front 为 头 指针 的 单 链表 的 第 1 个 元 素 
} 
void EnQueue(LinkQueue &0.,QFElemType e) 
{ // 插入 元 素 e 为 队列 8 的 新 的 队 尾 元 素 
ListInsert(Q. front,ListLength(0. front) + 1,e); // 在 最 后 一 个 元 素 之 后 插 人 e 
} 
Status DeQueue(LinkQueue &0 ,QElemType &e) 
{ // 若 队列 98 不 空 , 删 除 0 的 队 头 元 素 , 用 e 返 回 其 值 , 并 返回 OK; 否则 返回 ERROR 
证 (0.front -二 next == Q.rear) // 队列 仅 有 1 个 元 素 ( 删 除 的 也 是 队 尾 元 素 ) 
Q. rear = Q. front; // 令 队 尾 指针 指向 头 结 点 
return ListDelete(Q. front,1,e); // 删除 以 0. front 为 头 指 针 的 单 链 表 的 第 1 个 元 素 
} 
void QueueTraverse(LinkQueue Q.void(% visit)(QElemType)) 
{ // 从 队 头 到 队 尾 依次 对 队列 9 中 每 个 元 素 调 用 函数 visit() 
ListTraverse(Q. front,visit); // 依次 对 以 0. front 为 头 指针 的 单 链表 的 元 素 调用 visit() 


1 
上 


main3-3. cpp 是 检验 bo3-3. cpp 的 程序 。 它 的 主 函数 及 运行 结果 和 main3-2. cpp 的 完 
全 相同 。bo3-3. cpp 和 bo3-2. cpp 相 比 ,函数 编写 简单 .思路 清晰 ,但 由 于 没有 利用 Q. rear， 
EnQueue() 函 数 的 执行 效率 不 高 。 

// main3-3. cpp 检验 bo3-3.cpp 的 主 程序 

间 include"cl.h" 

typedef int QElemType; // 定义 队列 元 素 为 整 型 

间 include"c3-2.h" // 队列 的 链 式 存储 结构 

# include"bo3-3.cpp"”// 用 单 链 表 的 基本 操作 实现 链 队列 的 基本 操作 (9 个 ) 

间 include"func2-2.cpp" // 包括 equal() .comp() 、print()、print1() 和 print2() 函 数 

并 include"func3-2.cpp”// 主 函 数 


程序 运行 结果 同 main3-2. cpp 的 运行 结果 。 
342 循环 队列 一 一 队列 的 顺序 表示 和 实现 


c3-3.h 采用 循环 队列 : 当 队 尾 元 素 占 据 了 存储 空间 的 最 后 一 个 单元 时 ,如 再 有 新 的 元 
素 人 队 ,不 是 申请 新 的 存储 空间 ,而 是 将 新 元 素 插 到 存储 空间 的 第 1 个 单元 ,只 要 这 个 单元 
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为 空 ( 元 素 已 出 队 ) 即 可 。 通 过 头 尾 指针 对 存储 空间 MAX_QSIZE 求 余 做 到 这 一 点 ,形成 循 
环 队列 。 

在 循环 队列 中 , 队 尾 指针 可 能 小 于 队 头 指针 。 入 队 元 素 时 , 队 尾 指针 加 1。 当 队列 满 
时 , 队 尾 指针 等 于 队 头 指针 ,和 队列 空 的 条 件 一 样 。 为 了 区 别 队 满 和 队 空 ,在 循环 队列 中 , 少 
用 一 个 存储 单元 。 也 就 是 在 存储 空间 为 MAX_QSIZE 的 循环 队列 中 ,最 多 只 能 存放 MAX_ 
QSIZE 一 1 个 元 素 。 这 样 ,队列 空 的 条 件 仍 为 队 尾 指针 等 于 队 头 指 针 , 队 列 满 的 条 件 改 为 
( 队 尾 指针 十 1) 对 MAX_QSIZE 求 余 等 于 队 头 指 针 。 


// c3-3.h 队列 的 顺序 存储 结构 (循环 队列 ) 。 在 教科 书 第 64 页 ( 见 图 3-18) 


提 define MAX_QSIZE 5 // 最 大 队列 长 度 +1 SqQueue 

struct SqQueue rear 

{ QElenmType x base; // 初始 化 的 动态 分 配 存储 空间 front | QElemType 
int front; // 头 指针 ,车 队列 不 空 ,指向 队列 头 元 素 ee | 


int rear; // 尾 指针 , 若 队列 不 空 ,指向 队列 尾 元 素 的 下 一 个 位 置 图 3-18 循环 队列 的 存储 结构 
上 


// bo3-4. cpp 循环 队列 (存储 结构 由 c3-3.h 定义 ) 的 基本 操作 (9 个 ) 
void InitQueue( SqQueue &Q) 
{ // 构造 一 个 空 队列 0。 在 教科 书 第 64 页 ( 见 图 3-19) 一 一 


[网 
Q.base = (QElemType * )malloc(MAX QSIZE * sizeof(QElemType)); [3] 
if(1Q. base) // 存储 分 配 失败 ? 条 
exit(OVERFLOW) ; [0] 

Q. front = Q. rear = 0; Q 


} 图 3-19 空 队列 Q 
void DestroyQueue( SqQueue &0) 
{ // 销毁 队列 8,8 不 再 存在 ( 见 图 3-20) 

if(Q. base) // 队列 0 存在 


free(Q. base); // 释放 Q.base 所 指 的 存储 空间 0 
Q. base = NULL; // Q.base 不 指向 任何 存储 单元 0 
Q.front = 0Q. rear= 0; NULL 
} Q 
void ClearQueue( SqQueue &0) 图 3-20 ”销毁 队列 Q 


{ // 将 队列 Q 清 为 空 队列 ( 见 图 3-19) 
Q. front = 0Q. rear = 0; 


} 
上 


Status QueueEmpty( SqQueue 0) 
{ // 车 队列 8 为 空 队 列 , 则 返回 TRUE; 否则 返回 FALSE 
if(Q. front == Q. rear) // 队列 空 的 标志 
return TRUE; 
else 
return FALSE; 
} 
Status GetHead( SqQueue 0.QElemType &e) 


数据 结构 算法 解析 


{ // 若 队列 9 不 空 , 则 用 e 返 回 0 的 队 头 元 素 ,并 返回 OK; 否则 返回 ERROR 
证 (0. front == 0.rear) // 队列 空 
return ERROR; 
e=Q.base[Q.front]; // 将 队 头 元 素 的 值 赋 给 e 
return OK; 
} 
Status EnQueue( SqQueue &0.QElemType e) 
{ // 插入 元 素 e 为 队列 8 的 新 的 队 尾 元 素 。 在 教科 书 第 65 页 ( 见 图 3-21) 
if((Q. rear + 1) %MAX QSIZE == 0. front) // 队列 满 


[4] 

return ERROR; 9q3 [3] 

Q.base[Q. rear] =e; // 将 e 插 在 队 尾 4 9q2 |D] 

Q. rear = (Q. rear + 1) %MRX_ QOSTZE; | | 和 ba 

// 队 尾 指针 +1 后 对 MAX_QSIZE 取 余 Q 

return OK; (a) 调用 EnQueue0 前 

. 相国 

int QueueLength( SqQueue 0) q3 |[3] 

{ // 返回 队列 8 的 元 素 个 数 , 即 队 列 的 长 度 。 在 教科 书 第 64 页 0 L921[2] 

return(Q. rear — Q. front + MAX QSIZE) % MAX QSIZE; 1 ql 向 


} 
Status DeQueue( SqQueue &0.0ElenType &e) // 在 教科 书 第 65 页 
{ // 若 队列 9 不 空 , 则 删除 8 的 队 头 元 素 , 用 e 返 回 其 值 ， 


// 并 返回 OK; 否则 返回 ERROR( 见 图 3-22) 
if(Q. front == Q. rear) // 队列 空 


Q 
(b) 调用 EnQueue0O 后 


图 3-21 调用 EnQueue() 示 例 


return ERROR; 
e = 0.base[Q. front]; // 将 队 头 元 素 的 值 赋 给 国民 
Q.front = (0.front +1) %MAX_ QSIZE; // 移动 队 头 指针 3 q4 |[2 
return OK; 4 [qa3 10 
q2 | [0 
} 四 
void QueueTraverse(SqQueue 基 ee (a) 调用 DeQueue0 前 
{ // 从 队 头 到 队 尾 依次 对 队列 8 中 每 个 元 素 调用 函数 visit() 、 
int i= 0. front; // :最 初 指向 队 头 元 素 at 
while(il =Q.rear) // i 指向 队列 0 中 的 元 素 3] fale 
{ visit(Q. base[i]); // 对 i 所 指 元 素 调 用 函数 visit() 0 q3 [1 
i= (i+1) %MAX_QSIZE; // 羡 指向 下 一 个 元 素 加 0 


} 
i n\n (b) 调用 DeQueue() 后 
printf("\n"); 


} 图 3-22 调用 DeQueue() 示 例 


// main3-4. cpp 循环 队列 检验 bo3-4. cpp 的 主 程序 

间 include"cl.h" 

typedef int QFElemType; // 定义 队列 元 素 为 整 型 

间 include"c3-3.h" // 队列 的 顺序 存储 结构 (循环 队列 ) 

间 include"bo3-4.cpp”// 循环 队列 存储 结构 的 基本 操作 (9 个 ) 

# define ElemType QElemType // 将 func2-2. cpp 中 的 ElemType 类 型 定义 为 QElemType 类 型 


第 3 章 ” 栈 和 队列 


# include"func2-2. cpp" // 包括 equal() .comp() .print() .print1() 和 print2() 函 数 
void main() 
{ 
Status j; 
int i=0,.m; 
QElemType d; 
SqQueue 0; 
InitQueue(Q); // 初始 化 队列 8, 失 败 则 退出 
printf(" 初 始 化 队列 后 ,队列 空 否 ?%u(1: 空 0: 否 )\n" ,QueueEmpty(Q)); 
printf(" 请 输入 整 型 队列 元 素 (不 超过 %d 个 ), -1 为 提前 结束 符 : " ,MAX_QSIZE 一 1); 
do 


scanf("%d",&d); // 由 键盘 输入 整 型 队列 元 素 

iE(d== -1) // 输入 的 是 提前 结束 符 
break; // 退出 输入 数据 循环 

i++; // 计数 器 +1 

Enoueue(Q,d); // 人 队 输 入 的 元 素 

)while(i<MRX_QSIZE- 1); // 队列 元 素 的 个 数 不 超 过 允许 的 范围 

printf(" 队 列 长 度 为 %d,",QueueLength(0)); 

printf(" 现 在 队列 空 否 ?%u(1: 空 0: 否 )\n" ,QueueEmpty(Q)); 

printf(" 连 续 $%d 次 由 队 头 删除 元 素 , 队 尾 插入 元 素 : \n" ,MAX_QSIZE) ; 

for(m= 1;m<—= MAX QSIZE;m++ ) 

{ DeQueue(Q,d); // 删除 队 头 元 素 , 其 值 赋 给 d 
printf(" 删 除 的 元 素 是 %d, 请 输入 待 插入 的 元 素 :" ,d); 
scanf("%d",&d); // 输入 要 入 队 的 元 素 给 d 
EnQueue(0,d); // 将 d 入 队 

} 

m= QueueLength(Q); // nm 为 队列 8 的 长 度 

printf(" 现 在 队列 中 的 元 素 为 "); 

QueueTraverse(Q,print); // 从 队 头 到 队 尾 依次 对 队列 0 的 每 个 元 素 调用 函数 print() 

printf(" 共 向 队 尾 插 入 了 %d 个 元 素 。",i+ MAX QSIZE); 

if(m- 2>0) 
printf(" 现 在 由 队 头 删除 %d 个 元 素 ," ,m2); 

while(OueueLength(Q) 二 2) 

{ Degueue(0.d); // 删除 队 头 元 素 ,其 值 赋 给 d 
printf(" 删 除 的 元 素 值 为 sd,",d)， 

} 

j= GetHead(0,d); // 将 队 头 元 素 赋 给 d 

i£(j) // 队列 8 不 空 
printf(" 现 在 队 头 元 素 为 $d\n" .d); 

ClearQueue(0); // 清空 队列 Q 

printf(" 清 空 队 列 后 ,队列 空 否 ?su(1: 空 0: 否 )\n",QueueEmpty(Q)); 

DestroyQueue(0) ; // 销毁 队列 0 


数据 结构 算法 解析 


程序 运行 结果 : 


初始 化 队列 后 ,队列 空 否 ? 1(1: 空 0: 否 ) 

请 输入 整 型 队列 元 素 (不 超过 4 个 ), -1 为 提前 结束 符 : 123 -1 
队列 长 度 为 3, 现 在 队列 空 否 ? 0(1: 空 0: 否 ) 

连续 5 次 由 队 头 删除 元 素 , 队 尾 插 入 元 素 : 


删除 的 元 素 是 1, 请 输入 待 插入 的 元 素 : 4 六 
删除 的 元 素 是 2, 请 输入 待 插入 的 元 素 : 5 上 巡 
删除 的 元 素 是 3, 请 输入 待 插入 的 元 素 : 6 
删除 的 元 素 是 4, 请 输入 待 插入 的 元 素 : 7 
删除 的 元 素 是 5, 请 输入 待 插入 的 元 素 : 8 六 


现在 队列 中 的 元 素 为 67 8 
共 向 队 尾 插入 了 8 个 元 素 。 现 在 由 队 头 删除 1 个 元 素 , 删 除 的 元 素 值 为 6, 现 在 队 头 元 素 为 7 


清空 队列 后 ,队列 空 否 ? 1(1: 空 0: 否 ) 
由 于 队列 要 在 表 的 一 端 插入 元 素 ,在 表 的 另 一 端 删除 元 素 , 故 采 用 链 式 存储 结构 比较 
好 。 可 以 从 根本 上 免除 移动 队列 元 素 的 操作 , 且 节约 存储 空间 。 


41 串 类 型 的 定义 


在 C 语言 中 ,字符 串 存 于 字符 型 数组 中 。 无 论 数组 有 多 大 ,都 用 数值 0 表示 串 结束 。 


机 
图 4-1 说 明了 字符 串 *put" 在 C 语言 中 的 存储 结构 。 其中。 ma 加 国 国 国 四 国 罗 


数组 a 的 定义 为 : [el [TTTTT] 
char a[ 10]; 有 效 字符 
C 语言 还 在 库 函 数 string. h 中 提供 了 许多 串 处 理 的 基 图 41 “but" 在 C 语 言 
本 操作 ,如 求 串 长 函数 strlen() 、 串 复制 函数 strcpy() 等 。 中 的 存储 结构 


算法 语言 本 身 提 供 的 字符 串 存储 结构 及 其 基本 操作 
不 一 定 能 满足 实际 应 用 的 需要 ,往往 还 要 根据 具体 情况 另外 定义 字符 串 的 存储 结构 及 基于 
该 存储 结构 的 基本 操作 。 

和 算法 2. 1 类 似 ,func4-1. cpp 中 的 算法 4. 1 的 形 参 S 和 T 的 类 型 是 String( 串 ) ,String 
也 是 抽象 的 串 类 型 。 算 法 4. 1 中 所 涉及 的 函数 都 是 串 的 基本 操作 ,如 InitString()、 
StrLength() 等 ,不 涉及 具体 的 数据 存储 结构 。func4-1. cpp 中 的 另 一 个 基本 操作 算法 ， 
Replace() 函数 也 与 数据 的 存储 结构 无 关 。 这 样 ,它们 就 可 以 应 用 到 任何 一 种 具体 的 串 存储 
结构 中 。main4-1. cpp 和 main4-2. cpp 都 调用 了 func4-1. cpp。 


// func4-1. cpp 与 存储 结构 无 关 的 两 个 基本 操作 
int Index(String S,String T,int pos) // 算法 4.1 
{ //T 为 非 空 串 。 若 主 串 S 中 第 pos 个 字符 之 后 存在 与 了 相等 的 子 串 ， 
// 则 返回 第 一 个 这 样 的 子 串 在 S 中 的 位 置 ; 否则 返回 0 
int n,m,i; 
String sub; 
InitString(sub); // 新 增 
if(pos>0) 
{ n= StrLength(S); // 主 串 S 的 长 度 
m= StrLength(T); // 模式 串 了 的 长 度 
i= pos; 
while(i<-=n-m+1l) // i 从 串 S 的 pos 到 倒数 第 nm 个 
{ SubString(sub,S,i,m); // 子 串 sub 是 从 主 串 S 的 第 并 个 字符 起 ,长度 为 中 的 子 串 


数据 结构 算法 解析 


if(StrCompare(sub,T)1 = 0) // 子 串 sub 不 等 于 模式 串 了 
++ is // 继续 向 后 比较 
else // 子 串 sub 等 于 模式 串 T 
return i; // 返回 模式 串 了 的 第 1 个 字符 在 主 串 S 中 的 位 置 


} 
return 0; // 主 串 S 中 不 存在 与 模式 T 相 等 的 子 串 
} 
Status Replacel( String &S,String T,String V) 
{ // 初始 条 件 : 串 ST 和 存在 , 串 了 是 非 空 串 
// 操作 结果 : 用 串 V 蔡 换 主 串 S 中 出 现 的 所 有 与 串 了 相等 的 不 重 倒 的 子 串 
int i=1; // 从 串 5 的 第 一 个 字符 起 查找 串 了 


Status k; 

if(StrEmpty(T)) // 了 是 空 串 
return ERROR; 

while(i) 


{ 并 = Index(S,T,i); // 结果 为 从 上 一 个 二 之 后 找到 的 子 串 了 的 位 置 
if(i) // 串 S 中 存在 串 T 了 
{ StrDelete(S,i,StrLength(T)); // 删除 串 T 
k= StrInsert(S,i,V; // 在 原 串 了 的 位 置 插入 串 V 
if(1k) // 不 能 完全 插入 ( 定 长 顺序 存储 结构 有 可 能 发 生 这 种 情况 ) 
return ERROR; 
i+= StrLength(V); // 在 插入 的 串 v 后面 继续 查找 串 T 了 


return OK; 


42 串 的 表示 和 实现 
42.1 定 长 顺序 存储 表示 


// c4-1.h 串 的 定 长 顺序 存储 结构 。 在 教科 书 第 73 页 ( 见 图 4-2) 


串 长 SString 
[0 [40] 
3|blult| | 加 


We 
有 效 字符 
图 4-2 定 长 顺序 存储 结构 
提 define MAX_STR_LEN 40 // 用 户 可 在 255(1 个 字 节 所 能 表示 的 最 大 整数 ) 以 内 定义 最 大 串 长 


typedef unsigned char SString[MAX_STR_LEN+ 1]; // 0 号 单元 存放 串 的 长 度 


// bo4-1.cpp 串 采用 定 长 顺序 存储 结构 (由 c4-1.h 定义) 的 基本 操作 (12 个 )， 
// 包括 算法 4.2、 算 法 4.3 和 算法 4.5。SString 是 数组 , 故 不 需要 引用 类 型 
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间 define DestroyString ClearString // DestroyString() 与 ClearString() 作 用 相同 
# define InitString ClearString // InitString() 与 ClearString() 作 用 相同 
Status StrAssign(SString T,char# chars) 
{ // 生成 一 个 其 值 等 于 chars 的 串 了 
int i; 
让 (strlen(chars) 二 MARX STR_LEN) // chars 的 长 度 大 于 最 大 串 长 
return ERROR; 
else 
{ T[0] = strlen(chars); // 0 号 单元 存放 串 的 长 度 
for(i=1;i<=T[0];i++ ) // 从 1 号 单元 起 复制 串 的 内 容 
T[i] =* (chars+i—1); 


return OK; 


} 
void StrCopy(SString T.SString S) 
{ // 由 串 S 复制 得 串 了 T 


int i; 
for(i=0;i<=S[0];i++) 
T[i] = SLi]; 


\ 
上 


Status StrEmpty(SString S) 
{ // 若 S 为 空 串 , 则 返回 TRUE; 否则 返回 FALSE 
if(SL0] == 0) 
return TRUE; 
else 
return FALSE; 
} 
int StrCompare(SString S,SString T) 
{ // 初始 条 件 : 串 S 和 串 了 存在 
// 操作 结果 : 车 S>T, 则 返回 值 >0; 若 S=T, 则 返回 值 = 0; 若 S<T, 则 返回 值 一 0 
int i; 
for(i=1;i<= S[0]g&i<=T[0];++ i) 
i£(S[i]! = T[i]) 
return S[i]— T[i]; 
return S[0] - T[0]; 
} 
int StrLength(SString S) 
{ // 返回 串 S 的 元 素 个 数 


return S[0]; 
} of 
void ClearString(SString S) 0] [40] 
{ // 初始 条 件 : 串 S 存 在 。 操 作 结果 : 将 S 清 为 空 串 ( 见 图 4-3) 

S[0] = 0; // 令 串 长 为 堆 图 4-3 空 串 S 


} 
Status Concat(SString T.SString S1,SString S2) // 算法 4.2 修改 


81 
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{ // 用 T 返 回 S1 和 S2 连接 而 成 的 新 串 。 若 未 截断 , 则 返回 TRUE; 否则 返回 FALSE 
int i; 
if(S1[0]+ S2[0] 一 = MAX_STR_LEN) // 未 截断 
{ for(i=1;i<=S1[0];i++) 
T[i] = Ss1[i]; 
for(i=1;i<=S2[0];i++) 
T[S1i[0] + i] = Ss2[i]; 
T[0] = S1[0] + s2[0]; 
return TRUE; 
} 
else // 截断 S2 
{ for(i=1;i<=S1[0];i++) 
T[i] = S1[i]; 
for(i=1;i<<= MAX_STR_LEN S1[0];i++ ) // 到 串 长 为 止 
TLS1[o]+ i] = s2[i]; 
T[0] = MAX_STR_LEN; 
return FALSE; 


} 
Status SubString(SString Sub,SString S,int pos,int len) 
{ // 用 Sub 返回 串 S 的 自 第 pos 个 字符 起 长 度 为 len 的 子 串 。 算 法 4.3 
int i; 
证 (pos 一 1||pos 二 S[0]||11len 一 0|11en>S[L0] - pos +1) // pos 和 1len 的 值 超出 范围 
return ERROR; 
for(i=1;i 一 = len;i++) 
Sub[i]=S[pos+i-1]; 
Sub[0] = len; 
return OK; 
} 
int Indexl(SString S,SString T,int pos) 
{ // 返回 子 串 了 在 主 串 S 中 第 pos 个 字符 之 后 的 位 置 。 若 不 存在 , 则 函数 值 为 0。 
// 其 中 ,T 非 空 ,1<pos<strLength(S)。 算 法 4.5 
int i,j; // 指示 主 串 S 和 子 串 了 的 当前 比较 字符 
if(1<<= pos&&gpos<<= SL0]) // pos 的 范围 合适 
{ 并 = pos; // 从 主 串 S 的 第 pos 个 字符 开始 和 子 串 了 的 第 1 个 字符 比较 
了 
while(i<= S[0Jggj<=T[0]) 
i£(S[i] == 了 [jj) // 当前 两 字符 相等 
{ ++is // 继续 比较 后 继 字符 
看 
} 
else // 当前 两 字符 不 相等 
{ i=i-j+2; // 两 指针 后 退 重 新 开始 匹配 
j=1; 
} 


让 (j>TL0]) // 主 串 S 中 存在 子 串 了 
return i— T[0]; 
else // 主 串 S 中 不 存在 子 串 了 
return 0; 
} 
else // pos 的 范围 不 合适 
return 0; 
} 
Status StrInsert(SString S,int pos,SString T) 
{ // 初始 条 件 : 串 S 和 T 存 在 ,1 过 pos 过 StrLength(S) + 1 
// 操作 结果 : 在 串 S 的 第 pos 个 字符 之 前 插入 串 T。 完 全 插入 返回 TRUE ,部 分 插入 返回 FALSE 
int i; 
证 (pos 一 1||pos 二 S[L0]+ 1) // pos 超出 范围 
return ERROR; 
if(S[0]+T[0] 一 = MAX_STR_LEN) // 完全 插入 
{ for(i= S[0];i 盖 =posii 一 ) // 移动 串 S 中 位 于 pos 之 后 的 字符 
SL[i+T[0J]]=S[i]; // 串 S 向 后 移 串 了 的 长 度 ,为 插入 串 了 准备 空间 
for(i= pos;i<pos+T[0o];i++ ) // 在 串 S 中 插入 串 了 
S[i]=T[i- pos+1]; 
SL0] += T[0]; // 更 新 串 S 的 长 度 
return TRUE; // 完全 插入 的 标记 
else // 部 分 插入 
{ for(i= MAX_STR LEN;i>= pos+T[L0];i 一 ) // 移动 串 $S 中 位 于 pos 之 后 且 移 后 仍 在 串 内 的 字符 
Ss[i] = s[i- T[0]]; 
for(i= pos;i<pos+T[0]&&i<= MAX_STR_LEN;i++ ) // 在 串 S 中 插入 串 T( 也 可 能 是 部 分 插入 ) 
S[i]=T[i- pos+1]; 
SL0] = MAX_STR_LEN; // 串 S 的 长 度 为 串 的 最 大 长 度 
return FALSE; // 部 分 插入 的 标记 


} 
Status StrDelete(SString S,int pos,int len) 
{ // 初始 条 件 : 串 S 存在 ,1 迄 pos 近 StrLength(S) - len+1 
// 操作 结果 : 从 串 S 中 删除 自 第 pos 个 字符 起 长 度 为 len 的 子 串 
int i; 
诈 (pos<<1||pos 二 S[0] - len+1||1len 二 0) // pos 和 len 的 值 超出 范围 
return ERROR; // 删除 不 成 功 的 标记 
for(i= pos+ len;i<= SL0];i++ ) // 对 于 删除 的 子 串 之 后 的 所 有 字符 
SLi- len]=S[i]; // 向 前 移动 删除 子 串 的 长 度 
S[0] -= len; // 更 新 串 S 的 长 度 
return OK; // 删除 成 功 的 标记 
} 
void StrPrint(SString S) 
{ // 输出 字符 串 S。 新 增 


int i; 
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for(i=1;i<=S[0];i++) 
printf("%c",S[i]); 
printf("\n"); 


// main4-1.cpp 检验 bo4-1.cpp 的 主 程序 
间 include"ci.h" 
# include"c4-1.h" // 串 的 定 长 顺序 存储 结构 
间 include"bo4-1.cpp" // 定 长 顺序 存储 结构 的 基本 操作 (12 个 ) 
typedef SString String; // 定义 抽象 数据 类 型 String 为 SString 类 型 
间 include"func4-1.cpp" // 与 存储 结构 无 关 的 两 个 基本 操作 
void main() 
{ 
int i,j; 
Status k; 
char s,c[MAX_STR_LEN+1]; // c 中 包括 串 结束 符 
SString t,sl,s2; 
printf(" 请 输入 串 s1: "); 
gets(c); // 由 键盘 输入 字符 串 给 c 
k= StrAssign(sl,c); // 将 字符 串 c 转 为 SString 类 型 , 存 人 sl 
if(1k) // 本 例 由 于 c 的 长 度 所 限 , 串 长 超过 MAX_STR_LEN 的 现象 不 会 发 生 
{ printf(" 串 长 超过 MAX_STR_LEN( =%d)\n" ,MAX_ STR_LEN) ; 
exit(OVERFLOW) ; 
} 
printf(" 串 长 为 %d, 串 空 否 ?%d(1: 是 0: 否 )\n",StrLength(s1),StrEmpty(s1)); 
StrCopy(s2,s1); // 复制 串 sl 生成 串 s2 
printf(" 复 制 sl 生成 的 串 为 "); 
StrPrint(s2); // 输出 串 s2 
printf(" 请 输入 串 s2: "); 
gets(c); // 由 键盘 输入 字符 串 给 c 
StrAssign(s2,c); // 将 字符 串 c 转 为 SString 类 型 , 存 人 s1。 可 不 要 返回 值 
并 = StrCompare(sl1,s2); // 比较 串 sl 和 串 s2 
if(i< 一 0) 
S=' 必 和 
else if(i== 0) 
S="'="; 
else 
= 
printf(" 串 slg%c 串 s2\n",s); 
k = Concat(t,sl,s2); // 由 串 sl 连接 串 s2 生成 串 t 
printf(" 串 sl 连接 串 s2 得 到 的 串 七 为 "); 
StrPrint(t); // 输出 串 t 
if(k == FALSE) 
printf(" 串 七 有 截断 \n"); 


ClearString(s1); // 清空 串 sl 
printf(" 清 为 空 串 后 , 串 sl 为 "); 
StrPrint(s1); // 输出 串 sl 
printf(" 串 长 为 $d, 串 空 否 ?7%d(1: 是 0: 否 )\n",StrLength(s1),StrEmpty(s1)); 
printf(" 求 串 t 的 子 串 , 请 输入 子 串 的 起 始 位 置 , 子 串 长 度 : "); 
scanf("%d, %d",&i,&j); 
k= SubString(s2,t,i,j); // 串 s2 为 串 七 的 第 并 个 字符 起 ,长 度 为 j 的 子 串 
if(k) // 串 s2 存在 
{ printf(" 子 串 s2 为 "); 
StrPrint(s2); // 输出 串 s2 
} 
printf(" 从 串 t 的 第 pos 个 字符 起 ,删除 len 个 字符 ,请 输入 pos,len: "); 
scanf("%d, %d",&i,&j); 
StrDelete(t,i,j); // 将 串 t 的 第 二 个 字符 起 的 j 个 字符 删除 
printf(" 删 除 后 的 串 七 为 "); 
StrPrint(t); // 输出 串 七 
i= StrLength(s2)/2; // 守 为 串 s2 长 度 的 一 半 取 整 
StrIinsert(s2,i,t); // 在 串 s2 的 第 i 个 字符 之 前 插入 串 t 
printf(" 在 串 s2 的 第 sd 个 字符 之 前 插入 串 七 后 , 串 s2 为 ",i); 
StrPrint(s2); // 输出 串 s2 
i= Index1(s2,t,1); // 从 串 s2 的 第 1 个 字符 起 查找 串 t 
printf("s2 的 第 sd 个 字符 起 和 七 第 一 次 匹配 \n" ,i); 
i= Index(s2,t,1); // 从 串 s2 的 第 1 个 字符 起 查找 串 t( 另 一 种 方法 ) 
printf("s2 的 第 $d 个 字符 起 和 七 第 一 次 匹配 \n" ,iD 
SubString(t,s2,1,1); // 串 t 为 串 s2 的 第 1 个 字符 
printf(" 串 七 为 "); 
StrPrint(t); // 输出 串 七 
Concat(sl,t,t); // 串 sl 为 2 个 串 七 
printf(" 串 sl 为 "); 
StrPrint(s1); // 输出 串 sl 
k= Replace(s2,t,s1l1); // 将 串 s2 中 的 所 有 不 重 盖 的 串 t, 用 串 sl 替换 
if(k) // 替换 成 功 
{ printf(" 用 串 sl 取代 串 s2 中 和 串 t 相 同 的 不 重 伙 的 串 后 , 串 s2 为 "); 
StrPrint(s2); // 输出 串 s2 
} 
DestroyString(s2); // 销毁 操作 与 清空 操作 作用 相同 
} 


程序 运行 结果 : 


请 输入 串 s1: aBCD 上 巡 

串 长 为 4, 串 空 否 ? 0(1: 是 0: 否 ) 
复制 sl 生成 的 串 为 ABCD 

请 输入 串 s2: 123456 巡 

串 s1 二 串 s2 
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串 sl 连接 串 s2 得 到 的 串 t 为 ABCD123456 

清 为 空 串 后 , 串 sl 为 

串 长 为 0, 串 空 否 ? 1(1: 是 0: 否 ) 

求 串 七 的 子 串 ,请 输入 子 串 的 起 始 位 置 , 子 串 长 度 : 3,7 

子 串 s2 为 CD12345 

从 串 七 的 第 pos 个 字符 起 ,删除 len 个 字符 ,请 输入 pos,len: 4,4 
删除 后 的 串 七 为 ABC456 

在 串 s2 的 第 3 个 字符 之 前 插入 串 t 后 , 串 s2 为 CDABC45612345 

s2 的 第 3 个 字符 起 和 + 第 一 次 匹配 

s2 的 第 3 个 字符 起 和 七 第 一 次 匹配 

串 七 为 C 

串 sl 为 CC 

用 串 sl 取代 串 s2 中 和 串 七 相同 的 不 重 麦 的 串 后 , 串 s2 为 CCDABCC45612345 


422 堆 分 配 存储 表示 


// c4-2.h 串 的 堆 分 配 存储 结构 。 在 教科 书 第 75 页 ( 见 图 4-4) 


struct HString HString char 
{ char * ch; // 若是 非 空 串 , 则 按 串 长 分 配 存储 区 ; 否则 ch 为 NULL ch 1 
int length; // 串 长 度 length 


| 


}s 图 4-4 堆 分 配 存储 结构 


// bo4-2. cpp 串 采用 堆 分 配 存储 结构 (由 c4-2.h 定义 ) 的 基本 操作 (12 个 ) 。 包 括 算法 4.4 
音 define DestroyString ClearString // DestroyString() 与 ClearString() 作 用 相同 
void InitString(HString&S) 
{ // 初始 化 (产生 空 串 ) 字 符 串 S。 新 增 ( 见 图 4-5) 
S. length= 0; 
S.ch= NULL; NULL 


} 0 
void ClearString(HString&S) S 
{ // 将 S 清 为 空 串 。 在 教科 书 第 77 页 ( 见 图 4-5) 
free(S.ch); // 释放 S. ch 所 指 空间 
InitString(S); // 初始 化 串 S 
} 
void StrAssign(HString &T,char# chars) 
{ // 生成 一 个 其 值 等 于 串 常量 chars 的 串 T。 在 教科 书 第 76 页 ( 见 图 4-6) 
int i,j; 
if(T.ch) // 了 指向 某 存储 单元 3 
free(T. ch); // 释放 T 原 有 存储 空间 人 
i= strlen(chars); // 求 chars 的 长 度 i 图 4-6 “but” 的 堆 存 储 结构 
if(1i) // chars 的 长 度 为 0 
Initstring(T); // 生成 空 串 
else // chars 的 长 度 不 为 0 


{ T.ch= (char x )malloc(ix sizeof(char)); // 分 配 串 存储 空间 
i£(1T.ch) // 分 配 串 存储 空间 失败 
exit(OVERFLOW) ; 
for(j= 0;j<i;j++ ) // 分 配 串 存储 空间 成 功 后 ,复制 串 chars[ ] 到 串 了 
T.ch[j] = chars[j]; 
T. length= i; // 更 新 串 了 的 长 度 


} 
void StrCopy(HString &T,HString S) 
{ // 初始 条 件 : 串 S 存 在 。 操 作 结果 : 由 串 S 复制 得 串 了 
int i; 
if(T.ch) // 串 了 不 空 
free(T. ch); // 释放 串 了 T 原 有 存储 空间 
T.ch= (char * )malloc(S. lengthx sizeof(char)); // 分 配 串 存储 空间 
i£(1T. ch) // 分 配 串 存储 空间 失败 
exit(OVERFLOW) ; 
for(i=0;i<S.length;i++ ) // 从 第 1 个 字符 到 最 后 一 个 字符 
T.ch[i] = S.ch[i]; // 逐一 复制 字符 
T. length = S. length; // 复制 串 长 
} 
Status StrEmpty(HString S) 
{ // 初始 条 件 : 串 S 存 在 。 操 作 结果 : 若 串 S 为 空 , 则 返回 TRUE; 否则 返回 FALSE 
if(S. length == 0&&S.ch== NULL) // 空 串 标 志 
return TRUE; 
else 
return FALSE; 
} 
int StrCompare(HString S,HString T) 
{ // 若 串 S> 串 了 T, 则 返回 值 之 0; 若 S=T, 则 返回 值 = 0; 车 S<7T, 则 返回 值 二 0。 在 教科 书 第 77 页 
int i; 
for(i=0;i<S. length&g&i<T. length;++ i) // 在 有 效 范围 内 
if(S.ch[i]!=T.ch[i]) // 逐一 比较 字符 
return S.ch[i] 一 T.ch[i]; // 不 相等 , 则 返回 2 字符 ASCII 码 之 差 
return S. length- T. length; // 在 有 效 范围 内 ,字符 相等 ,但 长 度 不 等 ,返回 长 度 之 差 
} 
int StrLength(HString S) 
{ // 返回 串 5 的 元 素 个 数 , 称 为 串 的 长 度 。 在 教科 书 第 77 页 
return S. length; 


§ 
上 


void Concat (HString &T.HString S1.HString S2) 
{ // 用 串 了 返回 由 串 S1 和 串 S2 连接 而 成 的 新 串 。 在 教科 书 第 77 页 
int ij 
if(T.ch) // 串 T 不 空 
free(T. ch); // 释放 串 T 原 有 存储 空间 
T. length = S1. length + S2. length; // 串 了 的 长 度 = 串 S1 的 长 度 + 串 S2 的 长 度 
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T.ch= (char * )malloc(T. length x sizeof(char)); // 分 配 串 了 的 存储 空间 
i£(1T.ch) // 分 配 串 存储 空间 失败 
@xit(OVERFLOW) ; 
for(i=0;i<<S1. length;i++ ) // 将 串 S1 的 字符 逐一 复制 给 串 了 
T.ch[i] = S1.ch[i]; 
for(i= 0;i 一 S2.length;i++ ) // 将 串 S2 的 字符 逐一 复制 给 串 T( 接 在 串 S1 的 字符 之 后 ) 
T. ch[LS1. length+ i]= S2.ch[i]; 
} 
Status SubString(HString &Sub,HString S,int pos,int len) 
{ // 用 Sub 返回 串 S 的 第 pos 个 字符 起 长 度 为 len 的 子 串 。 
// 其 中 ,1 受 pos 受 StrLength(S) 上 且 0 过 len 生 StrLength(S) - pos+ 1。 在 教科 书 第 77 页 
int i; 


证 (pos 一 1||pos 二 S. length| | len 一 0||len>S. length- pos+1) // pos 和 len 的 值 超出 范围 
return ERROR; // 无 法 用 Sub 返回 子 串 
if(Sub. ch) // 串 Sub 不 空 
free(Sub. ch); // 释放 串 Sub 原 有 存储 空间 
证 (!len) // 空子 串 
InitString(Sub); // 初始 化 串 Sub 
else // 完整 子 串 
{ Sub.ch= (char x )malloc(len x sizeof(char)); // 分 配 串 Sub 的 存储 空间 
if(1Sub. ch) // 分 配 串 存储 空间 失败 
exit(OVERFLONW) ; 
for(i=0;i<=len-1;i++) // 将 串 S 第 pos 个 字符 起 长 度 为 len 的 子 串 的 字符 逐一 复制 给 串 Sub 
Sub.ch[i]=S.ch[pos—1+i]; 
Sub. length= len; // 串 Sub 的 长 度 
} 
return OK; 
} 
Status StrInsert(HString &S,int pos,HString T) // 算法 4.4 
{ // 1<<pos 夺 StrLength(S) + 1。 在 串 S 的 第 pos 个 字符 之 前 插入 串 了 
int i; 
让 (pos 一 1||pos 二 S. length+1) // pos 不 合法 
return ERROR; 
if(T. length) // T 非 空 
{ S.ch = (char * )realloc(S. ch,(S. length +T. length) * sizeof(char)); // 重 分 S 存 储 空间 
if(1S.ch) // 重新 分 配 串 S 的 存储 空间 失败 
exit(OVERFLOW) ; 
for(i=S.length-1;i>=pos 一 1; 一 i) // 为 插入 了 而 腾 出 位 置 
S.ch[i+T.length] =S.ch[i]; 
for(i=0;i<T.length;i++)// 插 入 T 
S.ch[pos—1+i]=T.ch[i]; 
S. length += T. length; // 更 新 串 S 的 长 度 
} 


return OK; 
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Status StrDelete(HString &S,int pos.int len) 
{ // 从 串 S 中 删除 第 pos 个 字符 起 长 度 为 len 的 子 串 
int i; 
证 (S. length<pos + len- 1) // pos 和 len 的 值 超出 范围 
return ERROR; 
for(i= pos-1ii<= S.length- len;i++) // 将 待 删除 子 串 之 后 的 字符 逐一 前 移 
S.ch[i] = S.ch[i+ len]; 
S. length -= len; // 更 新 串 S 的 长 度 
S.ch = (char * )realloc(S. ch,S. length x sizeof(char)); // 重新 分 配 串 S 的 存储 空间 (减少 ) 
return OK; 
} 
void StrPrint(HString S) 
{ // 输出 字符 串 S。 新 增 
int i; 
for(i=0;i<S. length;i++) 
printf("%c",S. ch[i]); 
printf("\n"); 


// main4-2.cpp 检验 bo4-2.cpp 的 主 程序 
间 include"cl.h" 
间 include"c4-2.h" // 串 的 堆 分 配 存储 结构 
# include"bo4-2.cpp"”// 串 采用 堆 分 配 存储 结构 的 基本 操作 (12 个 ) 
typedef HString String; // 定义 抽象 数据 类 型 String 为 HString 类 型 
间 include"func4-1.cpp" // 与 存储 结构 无 关 的 两 个 基本 操作 
void main() 
{ 
int i; 
char c, * p= "God bye!l", * q= "God luck!"; 
HString t,s,r; 
InitString(t); // HString 类 型 必须 初始 化 
InitString(s); 
InitString(r); 
StrAssign(t,p); // 将 字符 串 p 的 内 容 转 成 HString 类 型 . 赋 给 t 
printf(" 串 七 为 "); 
StrPrint(t); // 输出 串 t 
printf(" 串 长 为 %d, 串 空 耕 ?%d(1: 空 0: 否 )\n",StrLength(t),StrEmpty(t)); 
StrAssign(s,q); // 将 字符 串 q 的 内 容 转 成 HString 类 型 . 赋 给 s 
printf(" 串 s 为 "); 
StrPrint(s); // 输出 串 s 
= StrCompare(s,t); // 比较 串 s 和 串 上 的 大 小 
if(i<0) 
c= <"'; 
else if(i== 0) 


C= "= 人 
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} 


else 
c=>'; 
printf(" 串 ssc 串 tn",c); 
Concat(r,t,s); // 连接 串 +t 和 串 s, 得 到 串 
printf(" 串 七 连接 串 s 产 生 的 串 工 为 "); 
StrPrint(r); // 输出 串 
StrAssign(s,"o0"); // 将 字符 串 "oo" 转 成 HString 类 型 , 赋 给 s 
printf(" 串 s 为 "); 
StrPrint(s); // 输出 串 s 
StrAssign(t,"o"); // 将 字符 串 "o" 转 成 HString 类 型 , 赋 给 七 
printf(" 串 七 为 "); 
StrPrint(t); // 输出 串 七 
Replace(r,t,s); // 将 串 上 中 和 串 t 上 相同 的 子 串 用 串 s 代替 
printf(" 把 串 工 中 和 串 t 相 同 的 子 串 用 串 s 代替 后 , 串 工 为 "); 
StrPrint(r); // 输出 串 = 
ClearString(s); // 清空 串 s 
printf(" 串 s 清空 后 , 串 长 为 sd, 空 否 ?%d(1: 空 0: 否 )N\n" ,StrLength(s) ,StrEmpty(s)); 
SubString(s,r,6,4); // 生成 的 串 s 为 从 串 上 的 第 6 个 字符 起 的 4 个 字符 
printf(" 串 s 为 从 串 的 第 6 个 字符 起 的 4 个 字符 ,长 度 为 sd, 串 s 为 ",s. length); 
StrPrint(s); // 输出 串 s 
StrCopy(t,r); // 由 串 复制 得 串 t 
printf(" 由 串 工 复制 得 串 t, 串 为"); 
StrPrint(t); // 输出 串 七 
StrInsert(t,6,s); // 在 串 t 的 第 6 个 字符 前 插入 串 s 
printf(" 在 串 t 的 第 6 个 字符 前 插入 串 s 后 , 串 七 为 "); 
StrPrint(t); // 输出 串 七 
StrDelete(t,1,5); // 从 串 上 的 第 1 个 字符 起 删除 5 个 字符 
printf(" 从 串 t 上 的 第 1 个 字符 起 删除 5 个 字符 后 , 串 七 为 "); 
StrPrint(t); // 输出 串 t 
printf("%d 是 从 串 t 的 第 1 个 字符 起 ,和 串 s 相同 的 第 1 个 子 串 的 位 置 \n",Index(t,s,1)); 
printf("%d 是 从 串 t 的 第 2 个 字符 起 ,和 串 s 相同 的 第 1 个 子 串 的 位 置 \n" ,Index(t,s,2)); 
DestroyString(t); // 销毁 操作 同 清空 


程序 运行 结果 : 


串 七 为 God bye! 

串 长 为 8, 串 空 否 ? 0(1: 空 0: 否 ) 

串 s 为 God luck! 

串 s 二 串 七 

串 七 连接 串 s 产 生 的 串 r 为 God bye!God luck! 

串 s 为 oo 

串 七 为 o 

把 串 < 中 和 串 七 相同 的 子 串 用 串 s 代替 后 , 串 r 为 Good byelGood luck! 


串 s 清空 后 , 串 长 为 0, 空 否 ? 1(1: 空 0: 否 ) 

串 s 为 从 串 开 的 第 6 个 字符 起 的 4 个 字符 ,长 度 为 4, 串 s 为 bye! 
由 串 上 = 复制 得 串 t, 串 t 为 Good bye!Good luck! 

在 串 七 的 第 6 个 字符 前 插入 串 s 后 , 串 蕊 为 Good byelbyelGood luck! 
从 串 七 的 第 1 个 字符 起 删除 5 个 字符 后 , 串 上 t 为 bye!bye!lGood luck! 
1 是 从 串 七 的 第 1 个 字符 起 ,和 串 s 相同 的 第 1 个 子 串 的 位 置 

5 是 从 串 上 的 第 2 个 字符 起 ,和 串 s 相同 的 第 1 个 子 串 的 位 置 


串 的 堆 分 配 存储 结构 (由 c4- 


2.h 定义 ) 根 据 串 的 长 度 ,动态 地 分 配 存储 空间 。 这 样 既 保 


证 满足 需要 ,又 不 浪费 空间 ,对 串 长 也 没有 限制 。 串 的 定 长 存储 结构 (由 c4-1.h 定义 ) 就 没 
有 这 样 灵活 了 。 在 Concat()、StrInsert() 和 Replace() 中 ,总 要 检查 串 是 否 被 截断 。 且 对 于 
短 串 的 情况 ,空间 浪费 较 大 。 故 堆 分 配 存储 结构 较 好 。 
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串 的 模式 匹配 算法 


43.1 求 子 串 位 置 的 定位 函数 Index(S,T,pos) 


串 的 模式 匹配 的 一 般 方法 ( 见 图 4-7) 如 算 pos i( 回 漳 后 的 新 初 值 ) 
法 4.5( 在 bo4-1. cpp 中 ) 所 示 : 由 主 串 S 的 第 
pos 个 字符 起 ,检验 是 否 存在 子 串 。 首 先 令 i SL 一 ~ EE 
等 于 pos(i 为 S 中 当前 待 比较 字符 的 位 序 )， i( 初 值 ) … ”i( 终 值 ) 


j 等 于 10j 为 工 中 当前 待 比较 字符 的 位 序 ), 如 j( 回 淹 后 的 新 初 值 ) 
果 S 的 第 i 个 字符 与 工 的 第 j 个 字符 相同 , 则 i、 
j 各 加 1 继续 比较 ,直至 工 的 最 后 一 个 字符 ( 找 
到 )。 如 果 在 比较 期 间 出 现 了 不 同 ( 没 找到 ), 则  j( 初 值 ) Se j( 终 值 ) 


| 


AlB[clple[elolalil [xk 


令 i 等 于 pos 十 1,j 等 于 1, 由 pos 的 下 一 个 位 置 图 4-7 模式 匹配 的 一 般 方法 


起 ,继续 查找 是 否 存在 子 串 工 。 


432 模式 匹配 的 一 种 改进 算法 


在 算法 4.5 中 , 主 串 S 的 指针 i 总 要 回溯 ,特别 是 在 如 图 4-7 所 示 的 有 较 多 字符 匹配 而 又 
不 完全 匹配 的 情况 下 ,回溯 得 更 多 。 这 时 , 主 串 S 的 每 个 字符 要 进行 多 次 比较 ,显然 效率 较 低 。 


如 果 能 使 主 串 S 的 指针 i 不 


回溯 ,也 就 是 使 主 串 S 的 每 个 字符 只 进行 一 次 比较 ,效率 会 


大 为 提高 。 这 是 可 以 做 到 的 。 仍 以 图 4-7 为 例 , 当 检 测 到 主 串 S 中 第 i( 终 值 ) 个 字符 与 模式 
串 工 中 第 j( 终 值 ) 个 字符 不 匹配 时 , 主 串 S 中 第 i( 终 值 ) 一 1,i( 终 值 ) 一 2,…,i( 终 值 ) 一 j( 终 
值 ) 个 字符 分 别 和 子 串 中 第 j( 终 值 ) 一 1,j( 终 值 ) 一 2,…,1 个 字符 相等 。 也 就 是 说 , 当 S 
和 全 在 第 i( 终 值 ) 个 字符 处 不 匹配 时 ,i( 初 值 ) 之 后 到 i( 终 值 ) 之 前 的 字符 中 不 再 有 A, 故 i 
可 仍 保持 在 终 值 处 不 动 ,j 回溯 到 子 串 T 的 第 1 个 字符 处 与 i 的 当前 字符 继续 进行 比较 。j 
回溯 到 第 几 个 字符 是 由 子 串 工 的 模式 决定 的 。 算 法 4.7 根据 子 串 工 生成 的 next 数组 指示 
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j 回溯 到 第 几 个 字符 。next 数组 的 意义 是 这 样 的 : 如 果 next[j] 二 k, 则 当 子 串 工 的 第 j 个 字符 
与 主 串 S 的 第 i 个 字符 “ 失 配 ”时 ,S 的 第 i 个 字符 
继续 与 T 的 第 k 个 字符 进行 比较 即 可 。T 的 第 k 
个 字符 之 前 的 那些 字符 均 与 S 的 第 i 个 字符 之 前 


el 
1 + 


i( 初 值 ) i( 终 值 也 是 新 初 值 ) 


的 字符 匹配 。 以 教科 书 中 图 4.5 为 例 , 设 子 串 工 j( 回 溯 后 的 新 初 值 ) 
为 “abaabcac”。 当 工 的 第 5 个 字符 与 S 的 第 i 个 
字符 失 配 时 ,S 的 第 一 1 个 字符 一 定 是 a; 和 工 的 “slblalaltlelale 


第 4 个 字符 相等 。 它 和 工 的 第 1 个 字符 相等 。 这 jh j( 终 值 ) 
样 ,S 的 第 i 个 字符 和 T 工 的 第 2 个 字符 开始 比较 即 
可 。 所 以 ,对 于 模式 串 “abaabcac”,next[5] 王 2, 详 二 人 beabon 的 到 和 Migs9 2 的 由 小 
见 图 4-8。 
算法 4.7 求 子 串 的 数组 next[] 还 有 可 改进 之 处 。 以 图 4-8 为 例 : 如 果 工 的 第 5 个 字符 
与 S 的 第 i 个 字符 失 配 , 则 S 的 第 i 个 字符 一 定 不 是 b。 这 样 ,尽管 S 的 第 i 一 1 个 字符 是 a， 
和 工 的 第 1 个 字符 相等 ,但 S 的 第 i 个 字符 肯定 和 工 的 第 2 个 字符 b 不 相等 。 所 以 可 令 
next[5] 王 1, 使 S 的 第 i 个 字符 和 T 工 的 第 1 个 字符 开始 比较 。 这 样 使 得 模式 串 又 向 右 移 了 
一 位 ,提高 了 匹配 的 效率 。 算 法 4. 8 是 改进 的 求 数组 next[ ] (在 算法 4. 8 中 的 形 参 是 
nextval[ ]) 的 算法 。 
算法 4.6 是 改进 的 模式 匹配 算法 。 它 利用 算法 4. 7 或 算法 4. 8 求 得 的 数组 next[] , 避 
免 主 串 指针 的 回溯 ,提高 了 算法 的 效率 。algo4-1. cpp 是 实现 改进 的 模式 匹配 算法 的 程序 。 
因数 get_next() 和 get_nextval() 分 别 求 得 给 定 的 模式 串 的 数组 nextL] 和 nextval[] ,函数 
Index_KMP() 利 用 数组 next[ ] 或 nextval[ ] 求 出 模式 串 在 主 串 中 的 位 置 。 其 中 ,next[j] 王 0， 
并 不 是 将 主 串 的 当前 字符 与 模式 串 的 第 0 个 字符 进行 比较 (模式 串 也 没有 第 0 个 字符 ) ,而 
是 主 串 当前 字符 的 下 一 个 字符 与 模式 串 的 第 1 个 字符 进行 比较 。 
// algo4-1.cpp 实现 算法 4.6 一 算法 4.8 的 程序 
间 include"cl.h" 
间 include"c4-1.h" // 串 的 定 长 顺序 存储 结构 
间 include"bo4-1.cpp”// 定 长 顺序 存储 结构 的 基本 操作 (12 个 ) 
void get next(SString T,int next[ |) 
{ // 求 模式 串 了 的 next 函数 值 并 存 人 数组 next。 算 法 4.7 
int i=1,j=0; 
next[1] = 0; // 了 的 第 1 个 字符 与 主 串 “ 失 配 ”时 , 主 串 的 下 一 字符 与 了 的 第 1 个 字符 比较 ( 见 图 4-9) 
while(i 二 T[0]) // 当 TLo]>1 时 ,next[2]=1 
i£(j == 0||T[i] == 了 [j]) // 初 态 或 两 字符 相等 


{ 二; // 各 +1 继续 向 后 比较 
料 洲 图 4-9 next[] 的 初 态 


next[i]=j; // 主 串 和 了 在 第 i 个 字符 不 匹配 时 .前 j- 1 个 字符 是 匹配 的 ,只 须 与 第 j 个 字符 比较 
} 
else // 两 字符 不 等 

j= next[jj; // j 减 小 到 前 面 字符 相等 之 处 


next 
[OI … TI 
oll 


} 
void get_nextval(SString T.int nextval []) 


{ // 求 模式 串 了 的 next 函数 修正 值 并 存 人 数组 nextval。 算 法 4.8 
int i=1,j=0; 
nextval[1]= 0; // 了 的 第 1 个 字符 与 主 串 “ 失 配 ”, 主 串 的 下 一 字符 与 的 第 1 个 字符 比较 ( 见 图 4-10) 
while(i<—T[0]) 


nextval 
i£(j== 0||T[i] == T[j]) DD 
{ ++ii ol 
++j; 图 4-10 nextval[] 的 初 态 


iE(T[i]!=T[j]) // 此 处 与 算法 4.7 不 同 
nextval[i] = j; 
else 
nextval[i| = nextval[j]; 
} 
else 
j= nextval[j]; // j 减 小 到 前 面 字符 相等 之 处 
} 
int Index KMP(SString S,SString T,int pos,int next[ |) 
// 利用 模式 串 了 的 next 数组 求 T 在 主 串 S 中 第 pos 个 字符 之 后 的 位 置 的 KMP 算法 。 
// 其 中 ,T 非 空 ,1 三 pos 志 StrLength(S)。 算 法 4.6 
int i= pos,j=1; // 初始 位 置 
while(i 一 = S[0]ggj 一 = T[0]) // i 和 j 分 别 都 未 超出 主 串 S 和 模式 串 了 的 范围 
if(j == 0||s[i] == 了 [j]) // 继续 比较 后 继 字 符 


{ ++is 


++j; 
} 
else // 模式 串 向 右 移动 
j= next[j]; 
证 (j>T[0]) // 匹配 成 功 
return i— T[0]; 
else 
return 0; 
} 
void main() 
人 
int i, * p; 
SString sl1,s2; // 以 教科 书 算法 4.8 之 上 的 数据 为 例 
StrAssign(sl,"aaabaaaab"); // 由 "aaabaaaab" 和 后 成 主 串 sl 
printf(" 主 串 为 "); 
StrPrint(s1); // 输出 串 sl 
StrAssign(s2,"aaaab"); // 由 "aaaab" 生 成 子 串 s2 
printf(" 子 串 为 "); 
StrPrint(s2); // 输出 串 s2 
p= (int * )malloc((StrLength(s2) +1) x sizeof(int)); // 生成 s2 的 next 数组 ,[0] 不 用 
get_next(s2.p); // 利用 算法 4.7, 求 得 next 数组 , 存 于 p 中 
printf(" 子 串 的 next 数组 为 "); 
for(i=1;i<~= StrLength(s2);i++) 
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printf("%d", x (p+1i)); 
printf("\n"); 
i= Index_KMP(sl,s2,1,p); // 利用 算法 4.6 求 得 串 s2 在 sl 中 首次 匹配 的 位 置 诗 
if(i) 
printf(" 主 串 和 子 串 在 第 %d 个 字符 处 首次 匹配 \n" ,iD 
else 
printf(" 主 串 和 子 串 匹配 不 成 功 \n"); 
get_nextval(s2,p); // 利用 算法 4.8, 求 得 nextval 数组 , 存 于 p 中 
printf(" 子 串 的 nextval 数组 为 "); 
for(i=1;i<~= StrLength(s2);i++) 
printf("%d", * (p+ i)); 
printf("\n"); 
printf(" 主 串 和 子 串 在 第 %d 个 字符 处 首次 匹配 \n" ,Index_KMP(s1,s2,1,p)); 
} 


程序 运行 结果 : 


主 串 为 aaabaaaab 

子 串 为 aaaab 

子 串 的 next 数组 为 01234 

主 串 和 子 串 在 第 5 个 字符 处 首次 匹配 
子 串 的 nextval 数组 为 00004 

主 串 和 子 串 在 第 5 个 字符 处 首次 匹配 


数组 和 广义 表 


5.1 数组 的 顺序 表示 和 实现 


// c5-1.h 数组 的 顺序 存储 结构 。 在 教科 书 第 93 页 ( 见 图 5-1) Ep 
提 define MAX_ARRAY_DIM 8 // 假设 数组 维 数 的 最 大 值 为 8 nT 
struct Array bounds 
{ ElemType * base; // 数组 元 素 基 址 ,由 Initarray 分 配 Co 


int dim; // 数组 维 数 人 
int x bounds; // 数组 维 界 基 址 ,由 Initarray 分 配 图 5-1 数组 的 顺序 存储 结构 
int * constants; // 数组 映 象 函数 常量 基 址 ,由 Initarray 分 配 

和 


// bo5-1. cpp 顺序 存储 数组 (存储 结构 由 c5-1.h 定义 ) 的 基本 操作 (5 个) 

Status InitArray(Array &A,int dim,...) 

{ // 若 维 数 dim 和 各 维 长 度 合 法 , 则 构造 相应 的 数组 A, 并 返回 OK。 在 教科 书 第 93 页 ( 见 图 5-2) 
int elemtotal = 1,i; // elemtotal 是 数组 元 素 总 数 . 初 值 为 1( 累 乘 器 ) 


ap31 
va_list ap; // 变 长 参数 表 类 型 ,在 stdarg.h 中 
if(din 一 1| |dim>>MAX_ARRAY_DIM) // 数组 维 数 超出 范围 
return ERROR; a 
0 
R. dim = dim; // 数组 维 数 A ao0l 
A bounds = (int x* )malloc(dim * sizeof(int)); // 动态 分 配 数 组 维 界 基 址 |—=| aoo 
i£( 1A. bounds) 3 
3|4|2 
exit( OVERFLOW) ; 
8|2|1 


va_start(ap,dim); // 变 长 参数 “...” 从 形 参 dim 之 后 开始 
for(i=0;i<dim;++ i) 图 5-2 A[3][4][2] 数 
{ A.bounds[i] = va_arg(ap,int); // 逐一 将 变 长 参数 赋 给 A.bounds[ i] 组 的 存储 结构 
if(A. bounds[ i]<0) 
return UNDERFLOW; // 在 math.h 中 定义 为 4 
elemtotal x = A.bounds[i]; // 数组 元 素 总 数 = 各 维 长 度 之 乘积 
} 
va_end(ap) ; // 结束 提取 变 长 参数 
A. base = (ElemType * )malloc(elemtotal * sizeof (ElemType)); // 动态 分 配 数组 存储 空间 
if(!A. base) 
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exit(OVERFLOW) ; 
A.constants = (int * )malloc(dim x sizeof(int)); // 动态 分 配 数组 偏 移 量 基 址 
证 (1RA.constants) 
exit(OVERFLOW) ; 
R.constants[din-1]=1; // 最 后 一 维 的 偏 移 量 为 1 
for(i= dim- 2;i>=0; 一 i) 
A.constants[i]=A.bounds[i+1]*A.constants[i+1]; // 每 一 维 的 偏 移 量 


return OK; 
} 
void DestroyArray(Array &A) NULL 
{ // 销毁 数组 R。 在 教科 书 第 94 页 ( 见 图 5-3) 0 
if(A. base) // A. base 指向 存储 单元 NULL 
free(A. base) ; // 释放 A.base 所 指向 的 存储 单元 UE 
if(A. bounds) 
free(A. bounds); 图 5-3 销毁 数组 A 


if(A.constants) 
free(R. constants); 
A. base = A. bounds = A. constants = NULL; // 使 它们 不 再 指向 任何 存储 单元 
A.dim= 0; 
} 
Status Locate(Array A,va_list ap,int &off) // Value() ,Assign() 调 用 此 函数 
{ // 阁 ap 指 示 的 各 下 标 值 合法 , 则 求 出 该 元 素 在 A 中 的 相对 地 址 off。 在 教科 书 第 94 页 
int i,ind; 
off = 0; 
for(i=0;i<A.dim;i++ ) 
{ ind= va_arg(ap,int); // 逐一 读 取 各 维 的 下 标 值 
让 (ind<0|| ind> = A.bounds[i]) // 各 维 的 下 标 值 不 合法 
return OVERFLOW; 
off += A.constants[i]* ind; // 相对 地 址 = 各 维 的 下 标 值 * 本 维 的 偏 移 量 之 和 
} 
return OK; 
} 
Status Value(ElemTYpe &e,Array A,.…) // 在 VC++ 中 ,“...“ 之 前 的 形 参 不 能 是 引用 类 型 
{ //“.…" 依 次 为 各 维 的 下 标 值 .车 各 下 标 合法 , 则 e 被 赋值 为 A 的 相应 的 元 素 值 。 在 教科 书 第 94 页 
va_list ap; // 变 长 参数 表 类 型 ,在 stdarg.h 中 
int off; 
va_start(ap,A); // 变 长 参数 “...” 从 形 参 A 之 后 开始 
if(Locate(A,ap,off) == OVERFLOW) // 调用 Locate() , 求 得 变 长 参数 所 指 单元 的 相对 地 址 off 


return ERROR; 
e=x (A.base+ off); // 将 变 长 参数 所 指 单 元 的 值 赋 给 e 
return OK; 


} 
Status Assign(Array A.ElemType e..….) // 变量 A 的 值 不 变 . 故 不 需要 & 
{ //“..…" 依 次 为 各 维 的 下 标 值 ,车 各 下 标 合法 , 则 将 e 的 值 赋 给 A 的 指定 的 元 素 。 在 教科 书 第 95 页 
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va_list ap; // 变 长 参数 表 类 型 ,在 stdarg.h 中 

int off; 

va_start(ap,e); // 变 长 参数 “...” 从 形 参 e 之 后 开始 

if(Locate(A,ap,off) == OVERFLOW) // 调用 Locate() , 求 得 变 长 参数 所 指 单元 的 相对 地 址 off 
return ERROR; 

x* (A. base+ off) = e; // 将 e 的 值 赋 给 变 长 参数 所 指 单元 


return OK; 


// main5-1.cpp 检验 bo5-1. cpp 的 主 程序 

提 include"c1.h" 

typedef int ElemType; // 定义 数组 元 素 类 型 ElemType 为 整 型 
并 include"c5-1.h" // 数组 的 动态 顺序 存储 结构 

间 include"bo5-1.cpp" // 顺序 数组 存储 结构 的 基本 操作 (5 个 ) 


void main() 


{ 


Array A; 
int i,j,k,dim= 3,boundl = 3,bound2 = 4,bound3 = 2; // A[3][4][2] 数 组 
ElemType e; 
InitArray(A,dim,boundl1 ,bound2 ,bound3); // 构造 3x4x2 的 三 维 数组 A( 见 图 5-2) 
printf("A. bounds = "); 
for(i=0;i<dim;i++ ) // 顺序 输出 A. bounds 
printf("%d", x* (A.bounds + i)); 
printf("\nA. constants = "); 
for(i=0;i 一 dim;i++ ) // 顺序 输出 A. constants 
printf("%d", * (A.constants + i)); 
printf("\ngd 页 %d 行 %d 列 矩阵 元 素 如 下 :\n" ,boundl ,bound2 ,bound3); 
for(i=0;i<boundl;i++ ) 
{ for(j=0;j<bound2;j++) 
{ for(k= 0;k 一 bound3;k++ ) 
{ Assign(A,ix100+jx10+k,i,j,k); // 将 ix100+jx10+k 赋值 给 A[i][j][kj 
Value(e,A,i,j,k); // 将 ALi][j][k] 的 值 赋 给 e 
printf("A[ sd] [sd][sd] =%2d ",i,j,k,e); // 输出 ALiJ[j][k] 
} 
printf("\n"); 
} 
printf("\n"); 
} 
printf("A. base = \n"); 
for(i=0;i< 二 boundl x bound2 * bound3;i++ ) // 顺序 输出 A. base 
{ printf("%4d", * (A.base+1)); 
if(i% (bound2 * bound3) == bound2 * bound3 — 1) 
printf("\n"); 
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printf("A. dim=%d\n" ,A. dim); 


DestroyArray(A); 
} 
程序 运行 结果 : 
A.bounds=342 
A.constants=821 
3 页 4 行 2 列 矩阵 元 素 如 下 : 
a[o][o][o]= 0 a[o][o][1]= 1 
A[LOJ[1][0] =10 ALo]L1]L1] = 11 
RLo][2][0] = 20 ALo]L2][1] = 21 
RLo]L3][o] = 30 ALo][3][1] = 31 
RL1]Lo][o] = 100 AL1][o]j[L1] = 101 
RL1]L1][o] = 110 AL1][L1][1] = 111 
RL1]L2][o] = 120 AL1][2][1] = 121 
a[1][3][o] = 130 aA[1][3][1] = 131 
R[L2][o][o] = 200 AL[2][o][1] = 201 
RL2][1][o] = 210 AL2][1][1] = 211 
R[2][2][o] = 220 AM[2][2][1] = 221 
A[2][3][0] = 230 AL2][3][1] = 231 
及. base = 

0 1 101120 21 30 31 
100 101 110 111 120 121 130 131 
200 201 210 211 220 221 230 231 
R.dim = 3 


bo5-1. cpp 中 有 些 函 数 的 形 参 有 “…”, 它 代表 变 长 参数 表 , 即 “…” 可 用 若干 个 实 参 取 
代 。 这 很 适合 含有 维 数 不 定 的 数组 的 函数 。 因 为 如 果 是 两 维 数组 ,参数 中 要 包括 两 维 的 长 
度 , 两 个 整 型 量 ; 而 如 果 是 三 维 数组 , 则 参数 中 要 包括 三 维 的 长 度 , 三 个 整 型 量 。 随 着 所 构 
造 的 数组 的 维 数 不 同 ,参数 的 个 数 也 不 同 。 这 就 必须 使 用 变 长 参数 表 才 能 解决 参数 个 数 不 
定 的 问题 。algo5-1. cpp 是 采用 变 长 参数 表 的 一 个 实例 。 


// algo5-1. cpp 变 长 参数 表 ( 函 数 的 实 参 个 数 可 变 ) 编 程 示例 
间 include"ci.h" 
typedef int ElemType; // 定义 ElemType 为 整 型 
ElemType Max(int num,.…) // 函数 功能 : 返回 nun 个 数 中 的 最 大 值 
{ //“.…" 表 示 变 长 参数 表 . 位 于 形 参 表 的 最 后 .前 面 必须 至 少 有 一 个 固定 参数 
va_list ap; // 定义 ap 是 变 长 参数 表 类 型 (C 语言 的 数据 类 型 ) ,在 stdarg.h 中 
int i; 
ElemType m,n; 
if(num<—1) 
exit(OVERFLOW) ; 
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va_start(ap,num); // ap 指向 固定 参数 num 后 面 的 实 参 表 
m= va_arg(ap,ElemType); // 读 取 ap 所 指 的 实 参 ,其 类 型 为 ElemType, 将 其 赋 给 m,ap 向 后 移 
for(i=1;i<num;++i) // 从 第 2 个 数 到 最 后 一 个 数 
{ n=va arg(ap,ElemType); // 依次 读 取 ap 所 指 的 实 参 ,将 其 赋 给 n,ap 向 后 移 
if(m<n) 
m=n; // nm 中 存放 最 大 值 
} 
va_end(ap); // 与 va_start() 配 对 ,结束 对 变 长 参数 表 的 读 取 ,ap 不 再 指向 变 长 参数 表 
return m; // 将 最 大 值 返 回 
} 
void main() 
{ 
printf("1. 最 大 值 为 $d\n",Max(4,7,9,5,8)); // 在 4 个 数 中 求 最 大 值 ,ap 最 初 指向 7 
printf("2. 最 大 值 为 %d\n" ,Max(3,17,36,25)); // 在 3 个 数 中 求 最 大 值 ,ap 最 初 指向 17 
} 


程序 运行 结果 : 


1. 最 大 值 为 9 
2. 最 大 值 为 36 


其 实 ,printf() 就 是 含有 变 长 参数 表 的 C 语言 库 函 数 , 它 的 第 1 个 形 参 是 字符 串 常 量 或 
字符 型 指针 ,第 2 个 形 参 是 变 长 参数 表 。 因 此 ,我 们 才 可 以 在 1 个 printf() 函数 中 输出 任意 
个 变量 。 
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// c5-2.h 稀疏 矩阵 的 三 元 组 顺序 表 存 储 结构 。 在 教科 书 第 98 页 


间 define MAX_SIZE 100 // 非 零 元 个 数 的 最 大 值 ( 见 图 5-4) 

struct Triple 

{ int i,j; // 行 下 标 , 列 下 标 
ElemType e; // 非 零 元 素 值 

}s 

struct TSMatrix 

{ Triple data[MAX_ SIZE+ 1]; // 非 零 元 三 元 组 表 ,data[0] 未 用 
int mu,nu,tu; // 矩阵 的 行 数 , 列 数 , 非 零 元 个 数 

) 


图 5-5 是 采用 三 元 组 顺序 表 存 储 稀疏 矩阵 的 例子 。 为 简化 算法 ,在 创建 稀 朴 矩阵 输入 
非 零 元 时 ,要 按 行列 的 顺序 由 小 到 大 输入 。 
// func5-1. cpp 
int comp(int cl,int c2) // 比较 整数 cl 和 c2 的 大 小 关系 ,分别 返回 -1.0 和 1 
{ // AddsMatrix() 和 MultSMatrix() 函 数 要 用 到 
if(cl<c2) 
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Triple 二 
to [DT . 
中 [1[3|2|2] 
?|2|3|0] 
: 1214|41[4] 
[ew] 3|3|5|[5] 
| | [ar : 
: 人 | | | [MAX _SIZE] 
| |[IMAX_SIZE] 1 30 | 3 
Imu| 行 数 0050 自 
|mu| 列 数 3 
tu| 非 0 元 个 数 (a) 稀 巩 矩阵 (b) 存储 结构 
图 5-4 三 元 组 顺序 表 存 储 结构 图 5-5 三 元 组 存储 稀 玖 和 矩阵 
return 一 1; 
if(cl == c2) 
return 0; 
return 1; 


// bo5-2.cpp 三 元 组 稀疏 和 矩阵 的 基本 操作 (4 个 ) ,包括 算法 5.1 
Status CreateSMatrix(TSMatrix&M) 
{ // 创建 稀疏 矩阵 
int i; 
Triple T; 
Status k; 
printf(" 请 输入 矩阵 的 行 数 , 列 数 , 非 零 元 素 个 数 : "); 
scanf("%d, %d, %d",&M.mu,&M. nu,&M. tu); 
if(M. tu>MAX_SIZE) // 非 零 元 个 数 太 多 
return ERROR; 
M. data[0].i= 0; // 为 以 下 比较 顺序 做 准备 
for(i=1;i<=M.tu;i++) // 依次 输入 M.tu 个 非 零 元 素 
{ do 
{ printf(" 请 按 行 序 顺序 输入 第 %d 个 非 零 元 素 所 在 的 行 (1 一 dd) , 列 (1 一 %d) ,元 素 值 : "， 
i,M.mu,M.nu); 
scanf("%d, %d, %d",&T.i,&T.j,&T. e); 
k= 0; // 输入 值 的 范围 正确 的 标志 
if(T.i<1|17.i>M.mu|l17.j<1117.j 之 M.nu) // 行 或 列 超出 范围 
k=1; 
if(T. i<M.data[i—1].i|l|T.i==M.data[i-1].ig&&T.j<=M.data[i—1].j) 
k=1; // 行 或 列 的 顺序 有 错 
}while(k); // 输入 值 的 范围 不 正确 则 重新 输入 
M.data[i] = 了 ; // 将 输入 正确 的 值 赋 给 三 元 组 结构 体 M 的 相应 单元 
} 


return OK; 
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Status AddSMatrix(TSMatrix M,TSMatrix N.TSMatrix £0Q) 
{ // 求 稀疏 矩阵 的 和 Q=M+N 
intm=1l,n=1,q=0; 
i£(M. mul = N.mu| |M. nul = N.nu) // MAN 两 稀 朴 和 矩阵 行 或 列 数 不 同 
return ERROR; 
9Q.mu=M.mu; // 设置 稀 朴 矩阵 0 的 行 数 和 列 数 
Q.nu=M.nu; 
while(m 一 = M.tu&&gn 一 = N.tu) // 矩阵 XM 和 NN 的 元 素 都 未 处 理 完 
switch(comp(M. data[m].i,N. data[n].i)) // 比较 两 当前 元 素 的 行 值 关系 
{ case -1:0.data[ ++ 吕 =Mdata[m++ ]; // 和 矩阵 的 行 值 小 ,将 MM 的 当前 元 素 值 赋 给 矩阵 8 
break; 
case 0: switch(comp(M. data[m].j,N.data[n].j)) 
{ // MNN 矩 阵 当 前 元 素 的 行 值 相等 ,继续 比较 两 当前 元 素 的 列 值 关系 
case -1:0.data[ ++ qd] =M.data[m++ ]; // 和 矩阵 X 的 列 值 小 ,将 MX 的 值 赋 给 矩阵 0 
break; 
case 0: // MXN 和 矩阵 当前 非 零 元 素 的 行列 均 相 等 ,将 两 元 素 值 求 和 并 赋 给 矩阵 0 
Q.data[ ++ q] =M.data[m++ ]; 
0Q.data[q].e+=N.data[n++ ].e; 
if(Q. data[q].e== 0) // 两 元 素 值 之 和 为 0, 不 存 人 稀 玖 和 矩阵 
q™; 
break; 
case 1:0.data[ ++q]=N.data[n++]; // 和 矩阵 N 的 列 值 小 ,将 的 值 赋 给 矩阵 8 
} 
break; 
case 1:Q.data[ ++q]=N.data[n++]; // 矩阵 N 的 行 值 小 ,将 N 的 当前 元 素 值 赋 给 矩阵 Q 
} // 以 下 2 个 循环 最 多 执行 1 个 
while(m 一 = M.tu) // 矩阵 N 的 元 素 已 全 部 处 理 完毕 ,处理 和 矩阵 X 的 元 素 
Q.data[ ++ q] =M.data[m++ ]; 
while(n 二 = N.tu) // 矩阵 的 元 素 已 全 部 处 理 完毕 ,处 理 和 矩阵 N 的 元 素 
Q.data[ ++ q] =N.dataLn++ ]; 
if(q>MRX_SIZE) // 非 零 元 素 个 数 太 多 
return ERROR; 
Q.tu= q; // 矩阵 9 的 非 零 元 素 个 数 
return OK; 
} 
void TransposeSMatrix(TSMatrix M.TSMatrix &T) 
{ // 求 稀 朴 矩阵 X 的 转 置 矩阵 T。 修 改 敌 法 5.1 
int p,col,q=1; // q 指 示 转 置 矩 阵 了 的 当前 元 素 , 初 值 为 1 
T.mu= M.nu; // 矩阵 了 T 的 行 数 = 矩阵 K 的 列 数 
T.nu=M.mu; // 矩阵 T 了 的 列 数 = 矩阵 的 行 数 
T.tu=M.tu; // 和 矩阵 了 的 非 零 元 素 个 数 = 矩阵 X 的 非 零 元 素 个 数 
i(T.tu) // 矩阵 非 空 
for(col = 1;col 一 = M.nu;++ col) // 从 矩阵 了 的 第 1 行 到 最 后 一 行 
for(p = 1;p 一 = M.tu;++ p) // 对 于 和 矩阵 的 所 有 元 素 
if(M. data[p].j == col) // 该 元 素 的 列 数 = 当前 和 矩阵 了 的 行 数 
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{ T.data[ qj.i=M.data[p].j; // 将 矩阵 X 的 值 行列 对 调 赋 给 T 的 当前 元 素 
T. data[q].j=M.data[p].i; 
T.data[q++ ].e=M.data[p].e; // 转 置 和 矩阵 了 T 的 当前 元 素 指针 + 1 
} 
} 
Status MultSMatrix(TSMatrix M,TSMatrix N.TSMatrix £0) 
{ // 求 稀疏 矩阵 的 乘积 Q=MxN 
int i,j,q,p; 
ElemType Qs; // 矩阵 单元 QLi][j] 的 临时 存放 处 
TSMatrix T; // NN 的 转 秩 矩阵 
if(M. nul = N. mu) // 矩阵 MX 和 NN 无 法 相 乘 
return ERROR; 
Q.mu=M.mu; // 8 的 行 数 =M 的 行 数 
Q.nu=N.nu; // Q 的 列 数 =N 的 列 数 
Q.tu= 0; // 8 的 非 零 元 素 个 数 的 初 值 为 0 
TransposeSMatrix(N,T); //T 是 N 的 转 秩 矩 阵 
for(i=1;i<=Q.mu;i++) // 对 于 M 的 每 一 行 , 求 8[i][] 
{ q=1; // q 指 向 了 的 第 1 个 非 零 元素 
for(j=1;j 一 =T.mu;j++) // 对 于 T 的 每 一 行 ( 即 N 的 每 一 列 ), 求 o[i][D] 
{ Qs=0; // 设置 0Li][j] 的 初 值 为 0 
p=1; // p 指 向 M 的 第 1 个 非 零 元 素 
while(M. data[p].i<i) // 使 p 指 向 矩阵 M 的 第 i 行 的 第 1 个 非 零 元 素 
p++; 
while(T. data[q].i<j) // 使 q 指 向 矩阵 了 的 第 j 行 ( 即 矩 阵 N 的 第 j 列 ) 的 第 1 个 非 零 元 素 
qtts 
while(p 一 = M.tu&&q 一 =T.tu&&M.data[p].i== ig&T. data[q].i==j) 
// [pj 仍 是 的 第 i 行 的 非 零 元 素 且 [q] 仍 是 了 的 第 j 行 ( 即 N 的 第 j 列 ) 的 非 零 元 素 
switch(comp(M. data[p].j,T.data[q].j)) 
{ // 比较 矩阵 当前 元 素 的 列 值 和 T 和 矩阵 当前 元 素 的 列 值 ( 即 N 和 矩阵 当前 元 素 的 行 值 ? 
case -1:p++;i // M 和 矩阵 当前 元 素 的 列 值 二 T(N) 和 矩阵 当前 元 素 的 列 ( 行 ) 值 ,p 向 后 移 
break; 
// M 当前 元 素 的 列 值 = TC(N) 当 前 元 素 的 列 ( 行 ) 值 , 则 两 值 相 乘 并 累加 到 Qs,p、q 均 向 后 移 
case 0:0s+=M.data[p++ ].exT.data[q++ ].e; 
break; 
case 1:qt++; //M 和 矩阵 当前 元 素 的 列 值 之 7CN) 和 矩阵 当前 元 素 的 列 ( 行 ) 值 ,q 向 后 移 
} 
if(Qs) // 9[i][j] 不 为 0 
{ 证 (++ 0.tu>MRX SIZE) // 0 的 非 零 元 素 个 数 + 1. 如 果 非 零 元 素 个 数 太 多 
return ERROR; 
Q.data[Q.tuj.i=i; // 将 QLi][j] 按 顺序 存 人 稀 玖 矩阵 Q 
Q.data[Q.tu].j=j; 
Q.data[Q.tul].e= Qs; 
} 
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return OK; 


// bo5-3.cpp 三 元 组 稀疏 矩阵 的 基本 操作 (4 个 ) ,也 可 用 于 行 逻辑 链接 结构 
void DestroySMatrix(TSMatrix &M) 


{ // 销毁 稀 朴 矩阵 M( 见 图 5-6) 中 


M.mu=M.nu=M.tu=0; 


} 


[MAX_SIZE] 


void PrintSMatrix(TSMatrix M) 

{ // 按 矩 阵 形式 输出 8 
int i,j,k=1; // 非 零 元 计数 器 , 初 值 为 1 四 
Triple *p=M.data+1; // p 指 向 M 的 第 1 个 非 零 元 素 M 
for(i=1;i<<=M.mu;i++ ) // 从 第 1 行 到 最 后 一 行 图 5-6 销毁 稀疏 矩阵 M 


{ for(j=1;j 一 =M.nu;j++ ) // 从 第 1 列 到 最 后 一 列 
站 (k 二 =M.tu&g&p->i== iggp->j 一 j) // p 指 向 非 零 元 , 且 p 所 指 元 素 为 当前 循环 在 处 理 元 素 
{ printf("%3d",(p++ ) -二 e); // 输出 p 所 指 元 素 的 值 ,p 指 向 下 一 个 元 素 
k++; // 计数 器 +1 
} 
else // p 所 指 元 素 不 是 当前 循环 在 处 理 元 素 
printf("%3d" ,0); // 输出 0 
printf("\n"); 


} 
void CopYSMatrix(TSMatrix M,TSMatrix &T) 
{ // 由 稀 朴 矩阵 M 复制 得 到 了 
T=M; 
} 
Status SubtSMatrix(TSMatrix M,TSMatrix N,TSMatrix &Q) 
// 求 稀 朴 矩阵 的 差 0= MN 


int i; 
if(M.mul = N.mu| |M. nul = N.nu) // MNN 两 稀疏 矩阵 行 或 列 数 不 同 
return ERROR; 


for(i=1;i<=N.tu;++i) // 对 于 N 的 每 一 元 素 ,其 值 乘 以 -1 
N.data[i].e*=—1; 

AddSMatrix(M,N,Q); // Q=M+(-N) 

return OK; 


// func5-2. cpp 稀疏 矩阵 的 主 函 数 ,main5-2.cpp 和 main5-3.cpp 调用 
void main( ) 
{ 

TSMatrix A,B,C; 

printf(" 创 建 矩 阵 AR: "); 

CreateSMatrix(A); // 创建 算 阵 A 
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PrintSMatrix(A); // 输出 矩阵 A 
CopySMatrix(R,B); // 由 矩阵 复制 矩阵 B 
printf(" 由 矩阵 复制 矩阵 B: \n"); 
PrintSMatrix(B); // 输出 矩阵 了 
DestroySMatrix(B); // 销毁 矩阵 B 
printf(" 销 毁 矩 阵 B 后 : \n"); 
PrintSMatrix(B); // 输出 矩阵 了 B 
printf(" 创 建 矩 阵 B2:( 与 矩阵 A 的 行 、 列 数 相 同 ,行列 分 别 为 $d, sd)\n" ,A.mu,A. nu); 
CreateSMatrix(B); // 创建 矩阵 B 
PrintSMatrix(B); // 输出 矩阵 B 
RddSMatrix(R,B,C); // 和 矩阵 相 加 ,C=R+B 
printf(" 和 矩阵 C1(A+B): \n"); 
PrintSMatrix(C); // 输出 矩阵 C 
SubtSMatrix(A,B,C); // 矩阵 相 减 ,.C=R-B 
printf(" 和 矩阵 C2(R-B): \n"); 
PrintSMatrix(C); // 输出 矩阵 C 
TransposeSMatrix(R,C); // 矩阵 C 是 矩阵 的 转 秩 矩 阵 
printf(" 和 矩阵 C3(A 的 转 置 ) : \n"); 
PrintSMatrix(C); // 输出 矩阵 C 
printf(" 创 建 矩 阵 A2: "); 
CreateSMatrix(A); // 创建 和 矩阵 太 
PrintSMatrix(A); // 输出 矩阵 A 
printf(" 创 建 矩 阵 B3: ( 行 数 应 与 矩阵 A2 的 列 数 相 同 =s%d)N\n" ,A. nu); 
CreateSMatrix(B); // 创建 矩阵 B 
PrintSMatrix(B); // 输出 矩阵 B 
间 ifndef FLAG // 未 定义 FLAG 
MultSMatrix(A,B,C); // 矩阵 相 乘 ,.C=RxB 
间 else // 定义 了 FLAG 
MultSMatrix1(A,B,C); // 另 一 个 矩阵 相 乘 函 数 C= Rx B, 在 bo5-3.cpp 中 
endif 
printf(" 矩 阵 C5(AXB): \n"); 
PrintSMatrix(C); // 输出 矩阵 C 


// main5-2. cpp 检验 bo5-2. cpp 和 bo5-3.cpp 的 主 程序 

间 include"c1.h" 

typedef int ElemType; // 定义 矩阵 元 素 类 型 FlemType 为 整 型 

间 include"c5-2.h" // 稀 朴 矩阵 的 三 元 组 顺序 表 存 储 结构 

间 include"func5-1. cpp”// comp() 函数 

间 include"bo5-2.cpp" // 三 元 组 稀疏 矩阵 的 基本 操作 (4 个 ) 

间 include"bo5-3.cpp" // 也 可 用 于 行 逻 辑 链 接 结构 三 元 组 稀 玖 矩阵 的 基本 操作 (4 个 ) 
间 include"func5-2.cpp" // 主 函 数 
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程序 运行 结果 : 


创建 矩阵 A: 请 输入 矩阵 的 行 数 , 列 数 , 非 零 元 素 个 数 : 3.3,2 

请 按 行 序 顺序 输入 第 1 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 3) ,元 素 值 : 1,2,1 忆 

请 按 行 序 顺序 输入 第 2 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 3) ,元 素 值 : 2,2,2 
0 1 0( 见 图 5-7) 


0 2 0 0 5] 
0 0 0 0 沁 
由 矩阵 复制 矩阵 B: 0 0 a 
eo 图 5-7 矩阵 A 
0 区 ' 少 
0 0 0 
销毁 矩阵 B 后 : 


创建 矩阵 B2: (与 矩阵 A 的 行 、 列 数 相同 ,行列 分 别 为 3,3) 

请 输入 矩阵 的 行 数列 数 , 非 零 元 素 个 数 : 3,3,1 

请 按 行 序 顺序 输入 第 1 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 3) ,元 素 值 : 1,2,1 
0 0 


创建 矩阵 A2: 请 输入 矩阵 的 行 数 , 列 数 , 非 零 元 素 个 数 : 2.3,2 必 
请 按 行 序 顺序 输入 第 1 个 非 零 元 素 所 在 的 行 (1 一 2) , 列 (1 一 3) ,元 素 值 : 1,1,1 
请 按 行 序 顺序 输入 第 2 个 非 零 元 素 所 在 的 行 (1 一 2) . 列 (1 一 3) ,元 素 值 : 2,3,2 
0 
0 0 2 
创建 矩阵 B3: ( 行 数 应 与 矩阵 a2 的 列 数 相同 = 3) 
请 输入 矩阵 的 行 数 , 列 数 , 非 零 元 素 个 数 : 3,2,2 
请 按 行 序 顺序 输入 第 1 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 2) ,元 素 值 : 2,2,1 
请 按 行 序 顺序 输入 第 2 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 2) ,元 素 值 : 3,1,2 
0 0 
0 1 
2 0 
矩阵 C5CRx B) : 
0 0 
4 0 
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// algo5-2. cpp 实现 算法 5.2 的 程序 
间 include"c1.h" 
typedef int ElemType; // 定义 矩阵 元 素 类 型 ELemType 为 整 型 
间 include"c5-2.h" // 稀 玻 矩阵 的 三 元 组 顺序 表 存 储 结构 
include" func5-1. cpp”// comp() 晴 数 
间 include"bo5-2.cpp"// 三 元 组 稀疏 矩阵 的 基本 操作 (4 个 ) 
间 include"bo5-3.cpp" // 也 可 用 于 行 逻辑 链接 结构 三 元 组 稀 玖 和 矩阵 的 基本 操作 (4 个 ) 
void FastTransposeSMatrix(TSMatrix M,TSMatrix &T) 
{ // 快速 求 稀 朴 矩阵 的 转 置 矩阵 T。 修 改 算法 5.2 
int p,q,col, * num, * cpot; 
num= (int * )malloc((M. nu+1) x* sizeof(int)); // 存 X 每 列 (了 每 行 ) 非 零 元 素 个 数 ([0] 不 用 ) 
cpot = (int* )malloc((M.nu+1) * sizeof(int)); // 存 T 每 行 下 一 个 非 零 元 素 的 位 置 ([0] 不 用 ) 
T.mu= M.nu; // 了 的 行 数 =M 的 列 数 
T.nu=M.mu; // 了 的 列 数 =M 的 行 数 
T.tu=M.tu; // 了 的 非 零 元 素 个 数 =M 的 非 零 元 素 个 数 
if(T. tu) //T 是 非 零 矩阵 
{ for(col = 1;col 一 =M.nu;++ col) // 从 M 的 第 1 列 到 最 后 一 列 
num[col] = 0; // 计数 器 初 值 设 为 0 
for(p=1;p 一 =M.tuit+ p) // 对 于 的 每 一 个 非 零 元 素 
++ num[M. data[p].j]; // 根据 它 所 在 的 列 进行 统计 
cpot[1] =1; // 了 的 第 1 行 的 第 1 个 非 零 元 在 T.data 中 的 序号 为 1 
for(col = 2;col 一 = M.nu;++ col) // 从 M(T) 的 第 2 列 ( 行 ) 到 最 后 一 列 ( 行 ) 
cpot[col] = cpot[col- 1] +num[col -1]; // 求 T 的 第 col 行 第 1 个 非 零 元 在 T.data 中 的 序号 
for(p=1;p<=M.tu;t+p) // 对 于 M 的 每 一 个 非 零 元 素 
{ col=M.data[p].j; // 将 其 在 M 中 的 列 数 赋 给 col 
q= cpot[colj; // q 指 示 M 当前 的 元 素 在 了 中 的 序号 
T. data[q].i=M.data[p].j; // 将 M 当 前 的 元 素 转 秩 赋 给 T 
T.data[q].j=M. data[p]. i; 
T.data[q].e=M.data[p].e; 
++ cpot[col]; // 了 第 col 行 的 下 1 个 非 零 元 在 T.data 中 的 序号 比 当前 元 素 的 序号 大 1 


} 
free(num); // 释放 num 和 cpot 所 指向 的 动态 存储 空间 
free(cpot); 

} 

void main() 

{ 
TSMatrix A,B; 
printf(" 创 建 矩 阵 A:"); 
CreateSMatrix(A); // 创建 算 阵 A 
PrintSMatrix(A); // 输出 矩阵 A 
FastTransposeSMatrix(A,B); // B 是 A 的 转 秩 矩阵 
printf(" 和 矩阵 B(A 的 快速 转 置 ): \n"); 
PrintSMatrix(B); // 输出 矩阵 B 
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程序 运行 结果 : 


创建 矩阵 A: 请 输入 矩阵 的 行 数 , 列 数 , 非 零 元 素 个 数 : 3.2,4 
请 按 行 序 顺序 输入 第 1 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 2) ,元 素 值 : 1,1,1 
请 按 行 序 顺序 输入 第 2 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 2) ,元 素 值 : 2,1,2 
请 按 行 序 顺序 输入 第 3 个 非 零 元 素 所 在 的 行 (1 一 3) , 列 (1 一 2) ,元 素 值 : 3,1,3 
请 按 行 序 顺序 输入 第 4 个 非 零 元 素 所 在 的 行 (1 一 3), 列 (1 一 2) ,元 素 值 : 3,2,4 
1 0 
2 0 
3 4 
和 矩阵 BCGR 的 快速 转 置 ) : 
和 
0 0 4 


由 于 稀 玖 矩阵 的 三 元 组 顺序 表 存 储 结构 要 求 先 按 行 、 同 行 再 按 列 顺序 存储 非 零 元 素 , 算 
法 5. 1( 在 bo5-2. cpp 中 ) 采 用 了 双重 循环 求 转 置 矩阵 ,对 于 外 层 循 环 col( 列 ) 的 每 一 个 值 ,对 
所 有 的 非 零 元 素 , 如 果 其 列 数 与 col 相等 , 则 按 顺 序 存 人 转 秩 和 矩阵 。 这 就 保证 了 转 秩 和 矩阵 也 
是 先 按 行 、 同 行 再 按 列 顺序 存储 非 零 元 素 。 所 以 它 的 时 间 复 杂 度 为 0( 列 数 X 非 零 元 素 个 
数 )。 而 算法 5. 2( 在 algo5-2. cpp 中 ) 采 用 了 2 个 单 循环 。 第 1 个 循环 ,对 所 有 的 非 零 元 素 ， 
计算 其 所 在 列 并 计数 ,得 到 每 列 (col) 的 非 零 元 素 个 数 num[col] 及 每 列 第 1 个 非 零 元 素 在 转 
秩 和 矩阵 中 的 存储 位 置 cpotLcol]。 第 2 个 循环 ,对 所 有 的 非 零 元 素 , 根 据 其 列 数 和 cpot[col] 
的 当前 值 , 存 入 转 秩 矩 阵 。 由 于 还 要 给 num[col] 和 cpot[col] 赋 初 值 , 它 的 时 间 复 杂 度 为 O 
( 列 数 十 非 零 元 素 个 数 ) 。 


// c5-3.h 稀疏 矩阵 的 三 元 组 行 逻辑 链接 的 顺序 表 存 储 结构 ( 见 图 5-8) 
间 define MAX_SIZE 100 // 非 零 元 个 数 的 最 大 值 。 在 教科 书 第 100 页 
间 define MAX_RC 20 // 最 大 行 数 
struct Triple // 同 c5-2.h 
{ int i,j; // 行 下 标 , 列 下 标 
ElemType e; // 非 零 元 素 值 
}s 
struct RLSMatrix 
{ Triple data[ MAX_SIZE+1]; // 非 零 元 三 元 组 表 ,data[0] 未 用 
int rpos[MAX_RC+1]; // 各 行 第 1 个 非 零 元 素 的 位 置 表 , 比 c5-2.h 增加 的 项 
int mu,nu,tu; // 矩阵 的 行 数 , 列 数 , 非 零 元 个 数 
}s 


三 元 组 行 逻辑 链接 的 顺序 表 存 储 结构 (c5-3. h) 只 是 比 三 元 组 顺序 表 存 储 结构 (c5-2. h) 
增加 了 rpos 数组 ,用 以 存放 各 行 的 第 一 个 非 零 元 素 在 data 数组 中 的 位 置 。 方 便 查 找 指定 
行 的 元 素 。 图 5-9 是 采用 三 元 组 行 逻 辑 链 接 的 顺序 表 存 储 稀 朴 矩阵 的 实例 ,由 rpos[2] 和 
rpos[3] 的 值 可 知 : 第 2 行 的 非 零 元 素 有 2 个 ,位 于 dataL3] 和 dataL4]; dataL5] 是 第 3 行 的 第 
一 个 非 零 元 素 。 由 于 c5-3.h 存储 结构 和 c5-2. h 存储 结构 有 很 多 共同 之 处 ,c5-3. h 存储 结构 的 
一 些 基 本 操作 和 c5-2. h 存储 结构 的 基本 操作 (在 bo5-3. cpp 中 ) 一 样 ,只 要 通过 宏 定 义 将 
TSMatrix 类 型 定义 成 RLSMatrix 类 型 即 可 。 和 c5-2.h 存储 结构 一 样 ,c5-3. h 存储 结构 在 
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创建 稀 朴 矩阵 输入 非 零 元 时 ,也 要 按 行 、 列 的 顺序 由 小 到 大 输入 。 
RLSMatrix Triple 


] 四 
lille |iljle nom 
「 i 1|312|[2] 
有 值 | |:| |: 212131G] 
| lh [1214|4][4] 
data | pan 3[31515] 
空 ; . 时 
| [MAX_SIZE] [MAX_SIZE] 
四 
站 1 
i 3 |D] 
有 值 4| : |: 5 
| [mu] 外 
es | |mur0 : 
滞 代 到 区 [| 0 2 [MAX_RC] 
| 0304 3 
mu 有 ee 0050 4 
nu| 列 数 
ue (a) 稀 踊 矩阵 (b) 存储 结构 


图 5-8 三 元 组 行 迎 辑 链接 顺序 表 存 储 结构 图 5-9 采用 三 元 组 行 逮 辑 链接 存储 稀 玻 矩阵 的 示例 


// bo5-4.cpp 行 远 辑 链 接 稀疏 矩阵 (存储 结构 由 c5-3.h 定义 ) 的 基本 操作 (4 个 ), 包 括 算法 5.3 
Status CreateSMatrix(RLSMatrix &M) 
{ // 创建 稀 朴 矩阵 
int i,j; 
Triple T; 
Status k; 
printf(" 请 输入 矩阵 的 行 数 , 列 数 , 非 零 元 素 个 数 : "); 
scanf("%d, %d, %d",&M.mu,&M.nu,&M. tu); 
if(M. tu>>MAX_SIZE| |M. mu 二 MAX_RC) // 矩阵 M 的 非 零 元 个 数 太 多 或 行 数 太 多 
return ERROR; 
M. data[0].i= 0; // 为 以 下 比较 做 准备 
for(i=1;i<<=M.tu;i++) // 依次 输入 M.tu 个 非 零 元 素 
{ do 
{ printf(" 请 按 行 序 顺序 输入 第 %d 个 非 零 元 素 所 在 的 行 (1 一 dd) , 列 (1 一 %d) ,元 素 值 : "， 
i,M.mu,M.nu); 
scanf("%d, %d, $d",&T.i,&T.j,&T.e); 
k=0; // 输入 值 的 范围 正确 的 标志 
if(T.i<1|117.i>M.mul 1T7.j<1|17.j>M.nu) // 行 或 列 超出 范围 
k=1; 
if(T. i<M. data[i—1].i|l|T.i==M.data[i—1].igg&T.j<=M.data[i—1].j) 
k=1; // 行 或 列 的 顺序 有 错 
}while(k); // 输入 值 的 范围 不 正确 则 重新 输入 
M. data[ ij = T; // 将 输入 正确 的 值 赋 给 M 的 相应 存储 单元 
} 
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for(i=1;i<=M.muii++ ) // 给 rpos[] 赋 初 值 1( 每 行 第 1 个 非 零 元 素 的 初始 位 置 ) 
M.rpos[i]=1; 
for(i=1;i<<=M.tu;i++ ) // 对 于 每 个 非 零 元 素 , 按 行 统计 ,并 记 入 rpos[ ] 
for(j = M. data[i.i+1;j<=M.mu;j++ ) // 从 非 零 元 素 所 在 行 的 下 一 行 起 
M.rpos[j] ++; // 每 行 第 1 个 非 零 元 素 的 位 置 +1 
return OK; 
} 
Status AddSMatrix(RLSMatrix M,RLSMatrix N,RLSMatrix £0) 
{ // 求 稀 朴 矩阵 的 和 Q=M+N 
int k,p,q,up,uq; 
if(M.mul = N.mu| |M.nu! = N.nu) // M,N 两 稀 朴 矩阵 行 或 列 数 不 同 
return ERROR; 
Q.mu=M.mu; // 设置 稀 政 和 矩阵 8 的 行 数 和 列 数 
Q.nu=M.nu; 
Q.tu= 0; // 矩阵 Q 非 零 元 素 个 数 初 值 
for(k=1;k 二 = M.mu;++k) // 对 于 每 一 行 ,k 指示 行 号 
{ Q.rpos[k]=Q.tut+1; // 矩阵 Q 第 k 行 的 第 1 个 元 素 的 位 置 
p=M.rpos[k]; // p 指 示 和 矩阵 X 第 k 行 当前 元 素 的 序号 
q=N.rpos[k]; // q 指 示 和 矩阵 X 第 k 行 当前 元 素 的 序号 
if(k<<M. mu) // 不 是 最 后 一 行 
{ up=M.rpos[k+1]; // 下 一 行 的 第 1 个 元 素 的 位 置 是 本 行 元 素 的 上 界 
uq= N.rpos[k+1]; 
} 
else // 是 最 后 一 行 
{ up=M.tu+1; // 给 最 后 1 行 设 上 界 
uq=N.tu+1; 
} 
while(p 一 up&&q<uq) // 和 矩阵 MN 均 有 第 k 行 元 素 未 处 理 
switch(comp(M. data[p].j,N.data[q]j.j)) // 比较 两 当前 元 素 的 列 值 关 系 
{ // 矩阵 4 当前 元 素 的 列 二 矩阵 N 当前 元 素 的 列 , 将 X 的 当前 元 素 值 赋 给 矩阵 Q,p 向 后 移 
case -1:0.data[ ++ 0.tu] =M.data[p++]; 
break; 
case 0:if(M.data[p].e+N.data[q].e!=0) 
{ // 矩阵 M 当前 元 素 的 列 = 矩阵 N 当前 元 素 的 列 , 如 果 和 不 为 0 
Q.data[ ++ Q.tu] = M.data[p]; // 将 的 当前 元 素 值 赋 给 矩阵 Q 
Q.data[Q. tuj.e+=N.data[q].e; // 将 K 的 当前 元 素 值 中 成 员 e 的 值 加 入 其 中 
} 
P+; // p、q 均 向 后 移 , 无 论 和 是 否 为 0 
q+t+; 
break; 
// 矩阵 M 当前 元 素 的 列 二 矩阵 N 当前 元 素 的 列 , 将 X 的 当前 元 素 值 赋 给 矩阵 8,q 向 后 移 
case 1:0.data[ ++ 0Q.tu]=N.data[q++ ]; 
} // 以 下 2 个 循环 最 多 执行 1 个 
while(p<M.rpos[k+ 1]&&p<= M.tu) // N 的 第 k 行 元 素 已 全 部 处 理 ,M 还 有 第 k 行 的 元 素 未 处 理 
Q.data[ ++Q.tu]=M.data[p++ ]; // 将 M 的 当前 值 赋 给 Q,p 向 后 移 
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while(q<N. rpos[k+ 1]&&q<= N. tu) // 的 第 上 行 元 素 已 全 部 处 理 ,N 还 有 第 上 行 的 元 素 未 处 理 
Q.data[ ++Q.tu]=N.data[q++ ]; // 将 N 的 当前 值 赋 给 0,q 向 后 移 
} 
if(Q. tu>MRAX_SIZE) // 非 零 元 素 个 数 太 多 
return ERROR; 
else 
return OK; 
} 
void TransposeSMatrix(RLSMatrix M,RLSMatrix &T) 
{ // 求 稀 朴 矩阵 X 的 转 置 矩阵 了 
int i,j,k,num[MAX RC+1]; // [0o] 不 用 
T.mu=M.nu; // 和 矩阵 了 的 行 数 = 和 矩阵 YX 的 列 数 
T.nu=M.mu; // 和 矩阵 了 的 列 数 = 矩阵 的 行 数 
T.tu=M.tu; // 矩阵 了 的 非 零 元 素 个 数 = 矩阵 X 的 非 零 元 素 个 数 
f(T. tu) // 和 矩阵 非 空 
{ for(i=1;i<=T.mu;++i) // 从 矩阵 了 的 第 1 行 到 最 后 一 行 
num[i] = 0; // 矩阵 了 每 行 非 零 元 素 个 数 , 初 值 设 置 为 0 
for(i=1;i<=M.tu;++i) // 对 于 中 的 每 一 个 非 零 元 素 , 按 列 统计 
++ num[M. data[ i].j]; // num[] = 了 的 每 行 (M 的 每 列 ) 非 零 元 素 个 数 
T.rpos[1]=1; // 矩阵 T 中 第 工行 的 第 1 个 非 零 元 素 的 序号 是 1 
for(i=2;i<=T.mu;++i) // 从 矩阵 了 的 第 2 行 到 最 后 一 行 
T.rpos[i]=T.rpos[i-1]+num[i-1]; // 求 了 中 第 i 行 的 第 1 个 非 零 元 素 的 序号 
for(i=1;i<=T.mu;++ i) 
num[i] =T 了 .rpos[i]; // num[] = 的 当前 非 零 元 素 在 了 中 应 存放 的 位 置 
for(i=1;i<=M.tu;++ i) // 对 于 M 中 的 每 一 个 非 零 元 素 
{ j=M.data[i].j; // 在 矩阵 T 中 的 行 数 
k= num[j] ++; // 在 矩阵 了 T 中 的 序号 ,numn[j]+ 1 
T.data[k].i=M.data[i].j; // 将 M.data[i] 行 列 对 调 赋 给 T. data[k] 
T.data[k].j=M.data[i].i; 
T.data[k].e=M.data[il].e; 


} 
Status MultSMatrix(RLSMatrix M.RLSMatrix N.RLSMatrix &Q) 
{ // 求 稀 朴 矩阵 乘积 Q0=MxN。 算 法 5.3 
int arow,brow,p,qyccol,ctemp[MRX_RC + 1],t,tp; 
if(M.nul = N.mu) // 矩阵 X 和 AN 无 法 相 乘 
return ERROR; 
Q.mu = M.mu; // Q 的 行 数 =M 的 行 数 
Q.nu= N.nu; // 0 的 列 数 =X 的 列 数 
Q.tu= 0; // 8 的 非 零 元 素 个 数 的 初 值 为 0 
if(M. tux N. tul =0) //0 是 非 零 矩阵 
for(arow = 1;arow<<= M. mu;++ arow) // 对 M 的 每 一 行 ,arow 是 M 的 当前 行 
{ for(ccol = 1;ccol 一 = 0.nu;++ ccol) // 从 0 的 第 1 列 到 最 后 一 列 
ctemp[ccol] = 0; // 0 的 当前 行 的 各 列 元 素 累 加 器 清 零 
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Q. rpos[arow] = Q.tu+1; // Q 当前 行 的 第 1 个 元 素 位 于 上 一 行 最 后 1 个 元 素 之 后 
让 (arow<M.mu) // 不 是 最 后 一 行 
tp = M.rpos[arow+ 1]; // 下 一 行 的 第 1 个 元 素 的 位 置 是 本 行 元 素 的 上 界 
else // 是 最 后 一 行 
tp=M.tu+1; // 给 最 后 一 行 设 上 界 
for(p=M.rposLarow];p<tp;++ p) // 对 当前 行 中 每 一 个 非 零 元 
{ brow =M.data[p].j; // 找到 对 应 元 在 N 中 的 行 号 (M 当前 元 的 列 号 ) 
if(brow<N. mu) // 不 是 最 后 一 行 
t=N.rpos[brow+ 1]; // 下 一 行 的 第 1 个 元 素 的 位 置 是 本 行 元 素 的 上 界 
else // 不 是 最 后 一 行 
t=N.tu+1; // 给 最 后 一 行 设 上 界 
for(q=N.rpos[brow];q<t;++ q) // 对 当前 行 中 每 一 个 非 零 元 
{ ccol=N.data[q].j; // 乘积 元 素 在 0 中 的 列 号 
ctemp[ccol] += M. data[p].ex N. data[q].e; // 将 乘积 累加 到 8 的 arow 行 ccol 列 中 
} 
} // 求 得 9 中 第 arow 行 的 所 有 列 的 元 素 值 , 存 于 ctemp[] 中 
for(ccol = 1;ccol 一 = Q.nu;++ ccol) // 对 于 第 arow 行 的 所 有 列 , 只 存储 其 中 的 非 零 元 
if(ctemp[ccol]) // 该 列 的 值 不 为 0 
{ 证 (++0.tu>MRX_SIZE) // 8 的 非 零 元 素 个 数 +1, 如 果 非 零 元 个 数 太 多 
return ERROR; 
Q.data[Q.tu].i=arow; // 将 QLi][j] 按 顺序 存 人 稀 玖 和 矩阵 Q 
Q.data[ Q.tu].j = ccol; 
Q. data[Q. tu].e = ctemp[ccol]; 
} 
} 
return OK; 
} 
Status MultSMatrixl (RLSMatrix M.RLSMatrix N.RLSMatrix &0) 
{ // 另 一 种 求 稀 玖 和 矩阵 乘积 8= Mx N 的 方法 (不 使 用 临时 数组 ,利用 的 转 秩 矩 阵 T) 
int i,j,q,p,up,uql; 
ElemType Qs; // 矩阵 单元 8[i][j]j 的 临时 存放 处 
RLSMatrix T; // N 的 转 秩 矩 阵 
if(M. nul = N.mu) // 矩阵 X 和 AN 无 法 相 乘 
return ERROR; 
Q.mu=M.mu; // 8 的 行 数 =M 的 行 数 
Q.nu=N.nu; // 0 的 列 数 =N 的 列 数 
Q.tu= 0; // 9 的 非 零 元 素 个 数 的 初 值 为 0 
TransposeSMatrix(N,T); // T 是 的 转 秩 矩 阵 
for(i=1l;i<= omuii++) // 对 于 0 的 每 一 行 
for(j=13;j 一 = 0.nu;j++ ) // 对 于 0 的 每 一 列 , 求 o[ 菇 D 
{ Qs=0; // QLiJ[jj] 的 初 值 为 0 
p=M.rpos[i]; // p 指 示 和 矩阵 M 在 i 行 的 第 1 个 非 零 元 素 的 位 置 
q=T.rpos[j]; // q 指 示 和 矩阵 了 在 j 行 (N 在 j 列 ) 的 第 1 个 非 零 元 素 的 位 置 
if(i<M.mu) // 不 是 最 后 一 行 
up =M.rpos[i+1]; // 下 一 行 的 第 1 个 元 素 的 位 置 是 本 行 元 素 的 上 界 
else // 是 最 后 一 行 
up=M.tu+1; // 给 最 后 一 行 设 上 界 
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i£(j<T. mu) // 不 是 最 后 一 行 
uq=T.rpos[j+1]; // 下 一 行 的 第 1 个 元 素 的 位 置 是 本 行 元 素 的 上 界 
else // 是 最 后 一 行 
uq=T.tu+1; // 给 最 后 一 行 设 上 界 
while(p 一 up&&q<uq) // pq 分 别 指示 矩阵 MT 中 第 ij 行 元 素 
switch(comp(M. data[p].j,T.data[q].j)) 
{ // 比较 矩阵 当前 元 素 的 列 值 和 了 T 和 矩阵 当前 元 素 的 列 值 ( 即 N 和 矩阵 当前 元 素 的 行 值 ) 
case -1: p++; //M 和 矩阵 当前 元 素 的 列 值 王 T(CN) 和 矩阵 当前 元 素 的 列 ( 行 ) 值 ,p 向 后 移 
break; 
// NM 当前 元 素 的 列 值 = TQON 当前 元 素 的 列 ( 行 ) 值 , 则 两 值 相 乘 并 累加 到 Qs,p、q 均 向 后 移 
case 0: Qs+=M.data[p++ ].exT.data[q++ ].e; 
break; 
case 1: q++; // 和 抢 阵 当前 元 素 的 列 值 过 7CGN) 矩 阵 当 前 元 素 的 列 ( 行 ) 值 ,qd 向 后 移 
} 
if(Qs) // 8[i][j] 不 为 0 
{ if( ++Q.tu>>MAX_SIZE) // 0 的 非 零 元 素 个 数 + 1, 如 果 非 零 元 个 数 太 多 
return ERROR; 
Q.data[Q.tuj.i=i; // 将 QLiJ[j] 按 顺序 存 和 人 稀 政 矩阵 0 
Q.data[Q.tu].j= j; 
Q.data[Q.tul.e= Qs; 
} 
} 


return OK; 


// main5-3. cpp 检验 bo5-3.cpp 和 bo5-4. cpp 的 主 程序 

间 include"ci.h" 

typedef int ElemType; // 定义 矩阵 元 素 类 型 FlemType 为 整 型 

间 include"c5-3.h" // 稀 朴 矩阵 的 三 元 组 行 逻辑 链接 的 顺序 表 存 储 结构 

include"func5-1. cpp"// comp() 困 数 

# include"bo5-4.cpp"// 行 逻辑 链接 稀 朴 矩阵 存储 结构 的 基本 操作 (4 个 ) 

间 define TSMatrix RLSMatrix // 将 bo5-3.cpp 和 func5-2. cpp 中 的 TSMatrix 改 为 RLSMatrix 
间 include"bo5-3.cpp" // 也 可 用 于 行 逻 辑 链接 结构 三 元 组 稀 朴 矩阵 的 基本 操作 (4 个 ) 

// 提 define FLAG // 加 此 句 在 func5-2. cpp 中 调用 MultSMatrix1() ,不 加 则 调用 MultSMatrix() 
间 include"func5-2.cpp" // 主 函 数 


程序 运行 结果 同 main5-2. cpp 的 运行 结果 。 
53 广义 表 的 定义 


广义 表 , 顾 名 思 义 ,不 是 真正 的 线性 表 。 它 的 结构 更 像 第 6 章 介 绍 的 树 结构 , 它 的 许多 
基本 操作 都 是 采用 递归 算法 的 。 另 外 ,还 要 定义 如 何 表示 一 个 广义 表 , 也 就 是 广义 表 的 书写 
形式 。 本 书 采用 的 书写 形式 是 字符 串 。 算 法 5. 7( 在 bo5-5. cpp 和 bo5-6. cpp 中 ) 和 算法 5.8 
(在 func5-3. cpp 中 ) 将 广义 表 的 字符 串 书 写 形式 转换 为 广义 表 的 存储 结构 。 
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54 广义 表 的 存储 结构 


GLi GLNode( 子 表 
// c5-4. 广义 表 的 头 尾 链表 存储 结构 。 在 教科 书 第 109 页 二 i 
二 一 | ptrhp | ptritp 
enum FlemTag{ ATOM, LIST) ; 1 1 
// ATOM== 0: 原子 ,LIST == 1: 子 表 ( 见 图 5-10) Ns 一 -CC 一- 一- 


GList ”GLNode( 原 子 ) | | 


typedef struct GLNode 


-|0| atom 


{ ElemTag tag; // 公共 部 分 ,用 于 区 分 原子 结 点 和 表 结 点 GLNode ‘GLNode 
union // 原子 结 点 和 表 结 点 的 联合 部 分 图 5-10 广义 表 的 头 尾 链表 存储 结构 
{ AtomType atom; // atom 是 原子 结 点 的 值 域 ,AtomType 由 用 户 定义 
struct 


{ GLNode * hp, * tp; 
}ptr; // ptr 是 表 结 点 的 指针 域 ,prt. hp 和 ptr. tp 分 别 指向 表 头 和 表 尾 ( 表 头 之 外 的 其 余 元 素 ) 
站 
) * GList,GLNode; // 广义 表 类 型 


图 5-11 是 根据 c5-4.h 定义 的 广义 表 (a, (b,c,d)) 的 存储 结构 。 它 的 长 度 为 2, 第 1 个 
元 素 为 原子 a, 第 2 个 元 素 为 子 表 (b,c,d) 。 


GList 
sg -十 下 NULL| 
ofa 1| 二 ~ 十 ~ [Nurd 
| | | 
oflb ofe ofd 


图 5-11 广义 表 (a,(b,c,d)) 的 头 尾 链表 存储 结构 


为 了 和 c5-4. h 定义 的 存储 结构 相 区 别 , 令 c5-5. h 定义 的 结构 类 型 名 为 GListl 和 
GLNodel, 


// c5-5.h 广义 表 的 扩展 线性 链表 存储 结构 。 在 教科 书 第 110 页 ( 见 图 5-12) 
enum ElemTag{ ATOM,LIST) ; // ATOM == 0: 原子 ,LIST== 1: 子 表 
typedef struct GLNodel 


GListl GLNodel( 原 子 ) GListl GLNodel( 子 表 
(lemmeg tag; // 公共 部 分 ,用 于 区 分 原子 结 点 GListl，GLNodel( 原 了 ) GList 和， 


|0|atom | tp 本 hp | tp 

// 和 表 结 点 en 村 
union // 原子 结 点 和 表 结 点 的 联合 部 分 SS 人 
{ AtomType atom; // 原子 结 点 的 值 域 GLNodel GLNodel GLNodel 


GLNodel * hp; // 表 结 点 的 表 头 指针 
)， 图 5-12 广义 表 的 扩展 线性 链表 存储 结构 
GLNodel * tp; // 相当 于 线性 链表 的 next, 指 向 下 一 个 元 素 结 点 
} x* GList1,GLNodel; // 广义 表 类 型 GListl 是 一 种 扩展 的 线性 链表 


图 5-13 是 根据 c5-5.h 定义 的 广义 表 (a,(b,c,d)) 的 扩展 线性 链表 存储 结构 。 在 这 种 
结构 中 ,广义 表 的 头 指针 所 指 结 点 的 tag 域 值 总 是 1( 表 ) ,其 tp 域 总 是 NULL。 这 样 看 
来 ,广义 表 的 头 指针 所 指 结 点 相当 于 表 的 头 结 点 。 和 图 5-11 相 比 ,图 5-13 这 种 结构 更 简 


滞 些 。 
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图 5-13 广义 表 (a,(b,c,d)) 的 扩展 线性 链表 存储 结构 


55 广义 表 的 递归 算法 


// func5-3. cpp 广义 表 的 书写 形式 串 为 SString 类 型 ,包括 算法 5.8。bo5-5. cpp 和 bo5-6.cpp 调用 
间 include"c4-1.h" // 定义 SString 类 型 
间 include"bo4-1.cpp"// SString 类 型 的 基本 操作 
void sever(SString str,SString hstr) // 算法 5.8。SString 是 数组 ,不 需要 引用 类 型 
{ // 将 脱 去 外 层 括号 的 非 空 串 str 分 割 成 两 部 分 : hstr 为 第 一 个 ', 之 前 的 子 串 ,str 为 之 后 的 子 串 
int n,k=0,i=0; //k 记 尚未 配对 的 左 括号 个 数 
SString ch,cl,c2,c3; 
StrAssign(c1l,","); // cl="'," 
StrAssign(c2,"("); // c2="(" 
StrAssign(c3,")"); // c3=")" 
n= StrLength( str); // n 为 串 str 的 长 度 
do // 搜索 最 外 层 (k = 0 时 ) 的 第 1 个 逗号 
{ 村 址 
SubString(ch,str,i,1); // ch 为 串 str 的 第 并 个 字符 
证 (1StrCompare(chyc2)) // ch="(" 
++k; // 尚未 配对 的 左 括号 个 数 +1 
else if(!StrCompare(ch,c3)) // ch=")" 
一 k; // 尚未 配对 的 左 括号 个 数 -1 
} while(i<n&&StrCompare(ch,cl)||k! =0); // i 小 于 串 长 且 ch 不 是 最 外 层 的 ', 
if(i<n) // 串 str 中 存在 最 外 层 的 ',", 它 是 第 i 个 字符 
{ SubSstring(hstr,str,1,i-1); // hstr 返回 串 str',' 前 的 字符 
SubString(str,str,i+ln-i);// str 返回 串 str", 晤 的 字符 
} 
else // 串 str 中 不 存在 '… 
{ StrCopy(hstr,str); // 串 hstr 就 是 串 str 
ClearString(str); // ', 后 面 是 空 串 


// bo5-5.cpp 广义 表 头 尾 链表 存储 结构 (由 c5-4.h 定义 ) 的 基本 操作 (12 个 ) ,包括 算法 5.5 一 算法 5.7 
间 include"func5-3.cpp" // 算法 5.8 
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void InitGList(GList &L) 
{ // 创建 空 的 广义 表 工 ( 见 图 5-14) 
L= NULL; 
} 
void CreateGList(GList &L,SString S) // 算法 5.7 
{ // 采用 头 尾 链表 存储 结构 ,由 广义 表 的 书写 形式 串 S 创建 广义 表 L。 设 enp= "OO0" 
SString sub,hsub,emp; 


NULL 
L 


图 5-14 空 的 和 销毁 的 广义 表 工 


GList p,q; 
StrAssign(emp,"()"); // 空 串 emp="()" 
if(!StrCompare(S,emp)) // S="()" 
L=NULL; // 创建 空 表 ( 见 图 5-14) 
else // S 不 是 空 串 
{ i£(1(L= (GList)malloc(sizeof(GLNode)))) // 建 表 结 点 
exit(OVERFLOW) ; 
if(StrLength(S) == 1) // S 为 单 原子 ,这 种 情况 只 会 出 现在 递归 调用 中 
{ 工 -tag = ATOM; // 创建 单 原子 广义 表 
L->atom = S[1]; // 单 原子 的 值 为 字符 型 
} 
else // S 为 表 
{ 工 ->tag= LIST; // 工 是 子 表 
p=L; // p 也 指向 子 表 
SubString(sub,S,2,StrLength(S) — 2); 
// 脱 外 层 括号 (去 掉 第 1 个 字符 ( 左 括号 ) 和 最 后 1 个 字符 ( 右 括 号 )) 给 串 sub 
do // 重复 建 n 个 子 表 
{ sever(sub,hsub); // 从 sub 中 分 离 出 表 头 串 给 hsub, 其 余部 分 ( 表 尾 ) 给 sub 
CreateGList(p -二 ptr.hp,hsub); // 递归 创建 表 头 串 表 示 的 子 表 
q=p; // q 指 向 p 所 指 结 点 
if(1StrEmpty(sub)) // 表 尾 不 空 
{ if(1(p= (GLNode x )malloc(sizeof(GLNode)))) // 由 p 创建 表 结 点 
exit(OVERFLOW) ; 
p -之 tag = LIST; // p 是 子 表 
q->ptr.tp=pi // Pp 所 指 结 点 接 在 q 所 指 结 点 之 后 ,形成 q 的 下 一 个 结 点 
} 
}while(1StrEmpty(sub)); // 当 表 尾 不 空 
q->ptr.tp=NULL; // 设置 最 后 一 个 表 尾 指针 为 空 


} 
void DestroyGList(GList &L) 
{ // 销毁 广义 表 工 ( 见 图 5-14) 

GList ql ,q2; 

ifE(L) // 广义 表 工 不 空 

{ i£(L -之 tag == LIST) // 要 删除 的 是 表 结 点 

{ ql =EL->ptr.hp; // ql 指向 表 头 
q2= 工 -ptr.tp; // q2 指向 表 尾 ( 除 表 头 之 外 的 其 余部 分 ) 
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DestroyGList(ql1); // 递归 销毁 表 头 

DestroyGList(q2); // 递归 销毁 表 尾 
} 
free(L); // 释放 工 所 指 的 存储 空间 (无 论 工 是 表 结 点 还 是 原子 结 点 ) 
LI=NULL; // 工 不 指向 任何 存储 单元 


} 
void CopyGList(GList &T,GList L) 
{ // 采用 头 尾 链 表 存 储 结 构 ,由 广义 表 工 复制 得 到 广义 表 T。 算 法 5.6 
if£(1L) // 复制 空 表 
T= NULL; 
else // 广义 表 工 不 空 
T= (GList)malloc(sizeof(GLNode)); // 建 表 结 点 
if(!T) 
exit(OVERFLOW) ; 
T->tag=L->tag; // 复制 标志 域 
if(L- 二 tag== ATOM) // 单 原 子 
T->atom=L- 二 aton; // 复制 单 原子 
else // 子 表 
{ CopyGList(T -二 ptr.hp,D -二 ptr.hp); // 递归 复制 表 头子 表 


CopyGList(T -二 ptr.tp 民 -二 ptr.tp); // 递归 复制 表 尾 ( 除 表 头 之 外 的 部 分 ) 子 表 
} 


} 
int GListLength(GList L) 
{ // 返回 广义 表 的 长 度 , 即 元 素 个 数 
int len= 0; // 设置 广义 表 长 度 的 初 值 为 0 
while(L) // 未 到 表 尾 
{ LE=L->ptr.tp; // 工 指向 广义 表 最 外 层 的 下 一 个 元 素 
len++; // 表 长 +1 
} 
return len; 
} 
int GListDepth(GList L) 
{ // 采用 头 尾 链表 存储 结构 , 求 广义 表 工 的 深度 。 算 法 5.5 
int dep,max=0; 
GList pp; 
if(1L) // 广义 表 工 为 空 
return 1; // 空 表 深 度 为 1 
if(L -之 tag == ATOM) // 是 原子 结 点 
return 0; // 原子 深度 为 0, 只 会 出 现在 递归 调用 中 
for(pp=L;pp;pp = pp- 盖 ptr.tp) // 从 本 层 的 第 1 个 元 素 到 最 后 一 个 元 素 
{ dep = GListDepth(pp -二 ptr.hp); // 递归 求 以 pp -ptr. hp 为 头 指针 的 子 表 深度 
证 (dep 二 max) 
max = dep; // max 存 本 层 子 表 深 度 的 最 大 值 


} 
return max+ 1; // 非 空 表 的 深度 是 各 元 素 的 深度 的 最 大 值 加 1 
} 
Status GListEmpty(GList L) 
{ // 判定 广义 表 是 否 为 空 
if(1L) 
return TRUE; 
else 
return FALSE; 
} 
GList GetHead(GList L) 
{ // 生成 广义 表 工 的 表 头 元 素 , 返 回 指向 这 个 元 素 的 指针 
GList h; 
iE(1L) // 空 表 无 表 头 
return NULL; 
CopyGList(h'L -二 ptr.hp); // 将 工 的 表 头 元 素 复 制 给 h 
return h; 
} 
GList GetTail(GList L) 
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{ // 将 广义 表 工 的 表 尾 ( 除 表 头 之 外 的 部 分 ) 生 成 为 广义 表 , 返 回 指向 这 个 新 广义 表 的 指针 


GList t; 
if(1L) // 空 表 无 表 尾 
return NULL; 
CopyGList(t,L- 二 ptr.tp); // 将 工 的 表 尾 元 素 复制 给 t 
return t; 


上 


void InsertFirst GL(GList &L,GList e) 


GList p= (GList)malloc(sizeof(GLNode)); // 生成 新 的 表 头 结 点 
if(!p) 
exit(OVERFLOW) ; 
p- 之 tag= LIST; // 广义 表 工 的 类 型 是 表 
pp- 之 ptr. hp= e; // 工 的 表 头 指针 指向 e 
p->ptr.tp=L; // 工 的 表 尾 指针 指向 原 表 工 
L=p; // 工 指向 新 的 表 头 结 点 
} 
void DeleteFirst GL(GList &L.GList &e) 


// 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 插入 元 素 e( 也 可 能 是 子 表 ) 作 为 广义 表 工 的 第 1 个 元 素 ( 表 头 ) 


{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 删除 广义 表 工 的 第 1 个 元 素 ( 表 头 ) .并 用 e 返 回 其 值 


GList p=L; // p 指 向 第 1 个 表 结 点 
e=L->ptr.hp; // e 指 向 工 的 表 头 元 素 
LE=L->ptr.tp; // 工 指向 原 工 的 表 尾 ( 除 表 头 之 外 的 部 分 ) 
free(p); // 释放 p 所 指 的 表 结 点 
} 
void Traverse GL(GList L.void(% visit)(AtomType)) 
{ // 利用 递归 算法 遍历 广义 表 工 
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i£(L) // 工 不 空 
if(L -之 tag == ATOM) // 工 为 单 原子 
visit(L ->atom); 
else // 工 为 广义 表 
{ Traverse_GL(L -二 ptr.hp,visit); // 递归 遍历 工 的 表 头 
Traverse_GL(L -二 ptr.tpvvisit); // 递归 遍历 工 的 表 尾 


// func5-4.cpp 广义 表 的 主 函数 ,main5-4. cpp 和 main5-5.cpp 调用 

void main() 

{ 
char p[80]; 
SString t; 
GList n,m; 
InitGList(n); // 初始 化 广义 表 n,n 为 空 表 
printf(" 空 广义 表 n 的 深度 =%d,n 是 否 空 ?%d(1: 是 0: 否 )\n",GListDepth(n)， 
GListEmpty(n)); 
printf(" 请 输入 广义 表 n( 书 写 形式 : 空 表 :(), 单 原子 :(a) ,其 他 :(a,(b),c)): \n"); 
gets(p); // 将 描述 广义 表 n 的 字符 串 赋 给 p 
StrAssign(t,p); // 将 Pp 转换 为 SString 类 型 的 七 
CreateGList(n,t); // 根据 t 创 建 广义 表 n 
printf(" 广 义 表 n 的 长 度 =%d,",GListLength(n)); 
printf(" 深 度 =%d,n 是 否 空 ?%d(1: 是 0: 否 )\n" ,GListDepth(n),GListEmpty(n)); 
printf(" 遍 历 广 义 表 n: "); 
Traverse_GL(n,print2); // 遍历 广义 表 n 
CopyGList(m,n); // 复制 广义 表 m=n 
printf("\n 复制 广义 表 m= n,nm 的 长 度 =%d,",GListLength(m)); 
printf("m 的 深度 =%d\n 遍历 广义 表 m: " .GListDepth(m)); 
Traverse_GL(m,print2); // 遍历 广义 表 nm 
DestroyGList(m); // 销毁 广义 表 m, 释 放 存 储 空间 
m= GetHead(n); // 生成 广义 表 n 的 表 头 元 素 , 并 由 nm 指 向 
printf("\nm 是 n 的 表 头 元 素 , 遍 历 m:"); 
Traverse_GL(m,print2); // 遍历 广义 表 m 
DestroyGList(m); // 销毁 广义 表 m ,释放 存储 空间 
m= GetTail(n); // 将 广义 表 n 的 表 尾 ( 除 表 头 之 外 的 部 分 ) 生 成 为 广义 表 , 并 由 nm 指向 其 
printf("\nm 是 由 n 的 表 尾 形成 的 广义 表 , 遍 历 广义 表 nm: "); 
Traverse_GL(m,print2); // 遍历 广义 表 m 
InsertFirst_GL(m,n); // 将 广义 表 n 插 到 广义 表 m 中 ,并 作为 nm 的 第 1 个 元 素 ( 表 头 ) 
printf("\n 插 入 广义 表 n 为 nm 的 表 头 ,遍历 广义 表 mm: "); 
Traverse_GL(m,print2); // 遍历 广义 表 m 
DeleteFirst_GL(m.n); // 删除 广义 表 m 的 表 头 ,并 由 nn 指向 删除 的 表 头 
printf("\n 删除 m 的 表 头 ,并 由 n 指向 nm 的 表 头 ,遍历 广义 表 m: "); 
Traverse_GL(m,print2); // 遍历 广义 表 严 
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printf("\n 遍历 广义 表 n( 广 义 表 m 的 原 表 头 ): "); 
Traverse_GL(n,print2); // 遍历 广义 表 n 
printf("\n"); 

DestroyGList(m); // 销 筑 广义 表 m.n, 并 释放 存储 空间 
DestroyGList(n); 


// main5-4. cpp 检验 bo5-5.cpp 的 主 程序 

间 include"cl.h" 

typedef char AtomType; // 定义 原子 类 型 为 字符 型 

并 include"c5-4.h" // 定义 广义 表 的 头 尾 链表 存储 

# include"bo5-5.cpp" // 广义 表 的 头 尾 链表 存储 结构 的 基本 操作 (12 个 ) 

间 define ElemType AtomType // 将 func2-2.cpp 中 的 ElemType 类 型 定义 为 AtomType 类 型 
间 include"func2-2.cpp" // 包括 equal() .comp() 、print()、print1() 和 print2() 男 数 

# include" func5-4.cpp"// 主 滑 数 


程序 运行 结果 (以 教科 书 图 5. 7 为 例 ) : 


空 广义 表 n 的 深度 = 1,n 是 否 空 ? 1(1: 是 0: 否 ) 

请 输入 广义 表 n( 书 写 形式 : 空 表 :() , 单 原子 :(a) ,其 他 :(a,(b),c)): 

(0O 〇 ,(e),(a,(b,csd)))y ( 见 图 5-15) 

广义 表 n 的 长 度 =3, 深 度 =3,n 是 否 空 了 0(1: 是 0: 否 ) 

遍历 广义 表 n: eabcd 

复制 广义 表 m= n,n 的 长 度 =3,nm 的 深度 =3 

遍历 广义 表 m: eabcd 

m 是 n 的 表 头 元 素 , 遍 历 m: ( 见 图 5-16) 

m 是 由 nn 的 表 尾 形成 的 广义 表 , 遍 历 广义 表 m: ea bc d ( 见 图 5-17) 
插入 广义 表 n 为 m 的 表 头 ,遍历 广义 表 m: eabc deabcd( 见 图 5-18) 
删除 m 的 表 头 ,并 由 nn 指向 m 的 表 头 ,遍历 广义 表 m: eabcd( 见 图 5-17) 
遍历 广义 表 n( 广 义 表 m 的 原 表 头 ): ea bcd( 见 图 5-15) 
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图 5-15 广义 表 (O 〇 ,(e),(a,(b.c,d))) 的 头 尾 链 表 存储 结构 
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NULL 
5-16 广义 表 n 的 表 头 元 素 m 


119 


120 


数据 结构 算法 解析 


+ esl [Nurd 
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1 Nu 二 于 NuLd 
1 了 
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图 5-17 由 广义 表 n 的 表 尾 形成 的 广义 表 m 


1 二 -hl , 二 =~| | INuLu 
1 ! Nurd [ 于 于 Nu 
| | | 
ofe ofa 1 | 于 -下 | INuLU 
Ta esl | 村 = | INuLy oF ofe ofd 
[Rod [ [ 二 Nu 
n( 无 用 ) 1 | | 
ofe ofa 1 于 下 | et NuLd 
中 


图 5-18 将 广义 表 n 插 在 广义 表 m 中 并 作为 广义 表 m 的 表 头 


// bo5-6.cpp 广义 表 的 扩展 线性 链表 存储 (存储 结构 由 c5-5.h 定义 ) 的 基本 操作 (12 个 ) 
include"func5-3.cpp" // 算法 5.8 
void InitGList(GListl &L) 
// 创建 空 的 广义 表 工 ( 见 图 5-19) 
L= (GList1)malloc(sizeof(GLNodel)); // 建 表 头 结 点 

NULLINULL| 
EL->tag= LIST; // 给 表 头 结 点 的 标志 域 赋值 eT 


L 
->hp=L->tp=NULL; // 给 表 头 结 点 9 1 
| L p tp // 给 表 头 结 点 的 指针 域 赋值 图 5.19 空 的 广义 表 工 


void Create(GList] &L,SString S) 
{ // 由 广义 表 的 书写 形式 串 S 创建 子 表 工 ,CreateGList() 调 用 
SString emp, sub,hsub; 
GListl p; 
StrAssign(emp,"()"); // 设 emp="()" 
if(1(L= (GList1)malloc(sizeof(GLNode1)))) // 建 表 结 点 不 成 功 
exit(OVERFLOW) ; 
证 (1StrCompare(S,emp)) // 创建 空 表 
{ 工 - 之 tag = LIST; // 依然 是 表 
工 -hp = NULL; // 是 空 表 
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} 
else if(StrLength(S) == 1) // 创建 单 原子 广义 表 
{ ->>tag= ATOM; // 给 结 点 的 标志 域 赋值 
L->atom= S[1]; // 给 结 点 的 值 域 赋 值 
} 
else // 递归 创建 子 表 
{ 工 - 之 tag = LIST; // 是 表 
SubString(sub,S,2,StrLength(S) - 2)， 
// 脱 外 层 括 号 (去 掉 第 1 个 字符 ( 左 括号 ) 和 最 后 1 个 字符 ( 右 括号 )) 给 串 sub 
sever(sub,hsub); // 从 sub 中 分 离 出 表 头 串 hsub( 外 层 逗 号 之 前 的 ) , 表 尾 串 赋 给 sub 
Create(L -二 hp,hsub); // 创建 子 表 的 表 头 元 素 
p=L->hp; // p 指 向 子 表 的 表 头 元 素 
while(!StrEmpty(sub)) // 表 尾 不 空 , 则 重复 建 n 个子 表 
{ sever(sub,hsub); // 从 sub 中 分 离 出 表 头 串 hsub 
Create(p -二 tp,hsub); // 依次 创建 子 表 
p=p->tp; // p 向 后 移 


} 
L- 之 tp= NULL; // 尾 指针 为 空 
} 
void CreateGList(GList1 &L,SString S) // 修改 算法 5.7 
{ // 采用 扩展 线性 链表 存储 结构 ,由 广义 表 的 书写 形式 串 S 创建 广义 表 工 。 工 最 初 为 空 的 广义 表 
SString emp, sub, hsub; 
GListl p; 
StrAssign(emp,"()"); // 设 emp="()" 
if(! StrCompare(S,emp)) // S="()" 
InitGList(L); // 创建 空 表 
else // S 不 是 空 串 
{ SubString(sub,S,2,StrLength(S) — 2); 
// 脱 外 层 括号 (去 掉 第 1 个 字符 ( 左 括号 ) 和 最 后 一 个 字符 ( 右 括号 )) 给 串 sub 
sever(sub,hsub); // 从 sub 中 分 离 出 表 头 串 hsub( 外 层 逗 号 之 前 的 ) , 表 尾 串 赋 给 sub 
Create(L -二 hp,hsub); // 创建 表 头 元 素 
p= 上 -hp; // p 指 向 第 1 个 元 素 
while( 1StrEmpty(sub)) // 表 尾 不 空 , 则 继续 创建 子 表 
{ sever(sub,hsub); // 从 sub 中 分 离 出 最 前 面 的 串 给 hsub, 其 余部 分 赋 给 sub 
Create(p -二 tp,hsub); // 依次 创建 子 表 
p=p->tp; // p 向 后 移 
; 
p -tp= NULL; // 最 后 一 个 元 素 的 尾 指针 为 空 


} 


void DestroyGList(GListl &L) NULL 
{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 销毁 广义 表 工 ( 见 图 5-20) 工 
GListl ph,pt; 图 5-20 销毁 的 广义 表 工 


if(L) // 工 存在 
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{ // 由 ph 和 pt 接替 工 的 两 个 指针 
证 (C->tag) // 是 子 表 
ph=L->hp; 
else // 是 原子 
ph= NULL; 
pt=L->tp; 
DestroyGList(ph); // 递归 销毁 表 ph 
DestroyGList(pt); // 递归 销毁 表 pt 
free(L) ; // 释放 工 所 指 结 点 
L=NULL; // 令 工 为 空 


} 
void CopyGList(GListl &T,GList1 L) 
{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 由 广义 表 工 复制 得 到 广义 表 了 
T=NULL; 
if(L) // 工 存在 
{ T= (GListl)malloc( sizeof(GLNodel)); 
i£(1T) 
exit(OVERFLOW) ; 
T->tag=L->tag; // 复制 枚 举 变量 
if(L- 二 tag== ATOM) // 复制 共用 体 部 分 
T->atom=L- 二 atom; // 复制 单 原子 
else 
CopyGList(T -二 hp,L- 二 hp); // 复制 子 表 
if(L- 二 tp== NULL) // 到 表 尾 
T->tp=L->tp; 
else 
CopyGList(T -之 tp, 工 -之 tp); // 复制 子 表 


} 
int GListLength(GList1l L) 
{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 求 广义 表 工 的 长 度 , 即 元 素 个 数 
int len=0; 
GListl p=L- 二 bp; // p 指 向 第 1 个 元 素 
while(p) 
{ len++; 


return len; 
} 
int GListDepth(GList1l 工 ) 
{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 求 广 义 表 工 的 深度 
int max = 0,dep; 
GListl1 p; 
if(L ->tag== LIST&& 1L ->hp) 
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return 1; // 空 表 深 度 为 1 
else if(L -~>tag== ATOM) 
return 0; // 单 原子 表 深 度 为 0, 只 会 出 现在 递归 调用 中 
else // 求 一 般 表 的 深度 
for(p=L->hp;p;p=p->tp) 
{ dep = GListDepth(p); // 求 以 p 为 头 指针 的 子 表 深 度 
if(dep 二 max) 
max = dep; 
$ 
return max + 1; // 非 空 表 的 深度 是 各 元 素 的 深度 的 最 大 值 加 1 
} 
Status GListEmpty(GListl1 L) 
{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结果 : 判定 广义 表 工 是 否 为 空 
if(!1L ->hp) 
return OK; 
else 
return ERROR; 
} 
GListl] GetHead(GListl L) 
// 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 生成 广义 表 工 的 表 头 元 素 ,返回 指向 这 个 元 素 的 指针 
GListl h,p; 
if(!L->hp) // 空 表 无 表 头 
return NULL; 
p=L- 这 hp -tp; // p 指 向 工 的 表 尾 
L->>hp->tp=NULL; // 截 去 工 的 表 尾 部 分 
CopyGList(h,L- 二 hp); // 将 表 头 元 素 复制 给 h 
L->hp->tp=p; // 恢复 工 的 表 尾 (保持 原 工 不 变 ) 
return h; 
} 
GList1 GetTail(GList1 L) 
{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 将 工 的 表 尾 生成 为 广义 表 , 返 回 指向 这 个 新 广义 表 的 指针 
GListl t; 
InitGList(t); // 创建 空 的 广义 表 七 
if(L- 之 hp) // 工 非 空 
CopyGList(t -之 hbp,D- 二 hp- 二 tp); // 将 工 的 表 尾 复制 给 t 的 表 头 
return 七 ; 
} 
void InsertFirst GL(GList] &L,.GListl e) 
{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 插入 元 素 e( 也 可 能 是 子 表 ) 作 为 工 的 第 1 个 元 素 ( 表 头 ) 
GListl P=L->hp; // p 指 向 广义 表 工 的 第 1 个 元 素 
L->>hp=e; // 广义 表 工 的 头 指 针 指 向 e 
e->tp=pi // e( 只 是 1 个 元 素 , 其 尾 指针 必 为 NULL) 的 尾 指 针 指 向 工 原来 的 第 1 个 元 素 
} 
void DeleteFirst GL(GListl] &L.GList] &e) 
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{ // 初始 条 件 : 广义 表 工 存在 。 操 作 结 果 : 删除 广义 表 工 的 第 1 个 元 素 , 并 用 e 返 回 其 指针 
e=L->hp; // e 指 向 工 的 第 1 个 元 素 
让 (0->hp) // 工 非 空 
{ ->hp=e->tp; // 工 的 头 指针 指向 原 第 2 个 元 素 
e -tp= NULL; // e 的 尾 指 针 设 为 空 


} 
void Traverse GL(GListl] L,void(# visit)(AtomType)) 
{ // 利用 递归 算法 遍历 广义 表 工 
iE(L) // 工 存在 
{ if(L- 之 tag == ATOM) // 工 为 单 原子 
visit(L -二 atom); // 访问 单 原子 
else // 工 为 子 表 
Traverse_GL(L -二 hp,visit); // 遍历 上 ->hp 子 表 
Traverse_GL(L -二 tp,visit); // 遍历 工 -二 tp 子 表 


// main5-5. cpp 检验 bo5-6. cpp 的 主 程序 

间 include"cl.h" 

typedef char AtomType; // 定义 原子 类 型 为 字符 型 

间 include"c5-5.h" // 定义 广义 表 的 扩展 线性 链表 存储 结构 

间 include"bo5-6.cpp" // 广义 表 的 扩展 线性 链表 存储 结构 基本 操作 

间 define FlemType AtomType // 将 func2-2. cpp 中 的 ElemType 类 型 定义 为 AtomType 类 型 
间 include"func2-2.cpp" // 包括 equal() .comp() .print() .print1() 和 print2() 函 数 

间 define GList GList1 // 定义 func5-4. cpp 中 的 GList 类 型 为 GListl 类 型 

提 include"func5-4.cpp" // 主 函数 


程序 运行 结果 : 


空 广义 表 n 的 深度 = 1,n 是 否 空 ”1(1: 是 0: 否 ) 

请 输入 广义 表 n( 书 写 形式 : 空 表 :() , 单 原子 :(a) ,其 他 : (a,(b) ,c)): 
(as(p) ,cy ( 见 图 5-21) 

广义 表 n 的 长 度 =3, 深 度 =2,n 是 否 空 ? 0(1: 是 0: 否 ) 
遍历 广义 表 n: abc 

复制 广义 表 m==n.n 的 长 度 二 3,n 的 深度 二 2 

遍历 广义 表 m: abc 

m 是 n 的 表 头 元 素 ,遍历 m: a ( 见 图 5-22) 

m 是 由 nn 的 表 尾 形成 的 广义 表 , 遍 历 广义 表 m: bc ( 见 图 5-23) 

插入 广义 表 n 为 m 的 表 头 ,遍历 广义 表 m: abc bc ( 见 图 5-24) 
删除 nm 的 表 头 ,并 由 nn 指向 m 的 表 头 ,遍历 广义 表 m: bc ( 见 图 5-23) 
遍历 广义 表 n( 广 义 表 m 的 原 表 头 ): a bc ( 见 图 5-21) 
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n| d=[i| INuLd 
ofal =0hl JlolclNory 
0 ! NULU m[ ~[ofalNULU 
图 5-21 广义 表 (a,(b),c) 的 扩展 线性 链表 存储 结构 图 5-22 广义 表 n 的 表 头 元 素 m 
m[ 了 才 ~LLNuo 
1 1 j= =[ofc[NuLd 
(元 用 ) | 
m[L_ 才 ~[LINuo | 
| [ofelNurd] Te = =|0[c|NULU 
ofbINULU olo[NuLU 
图 5-23 由 广义 表 n 的 表 尾 形 成 的 广义 表 m 图 5-24 将 广义 表 n 插 在 广义 表 mm 中 


并 作为 广义 表 m 的 表 头 
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61 二 又 树 


// c6-1.h 二 叉 树 的 顺序 存储 结构 。 在 教科 书 第 126 页 ( 见 图 6-1) 

间 define MAX_TREE_SIZE 100 // 二 叉 树 的 最 大 结 点 数 

typedef TElemType SqBiTree[ MAX _TREE SIZE]; // 0 号 单元 存储 根 结 点 

struct position // 新 增 

{ int level,order; // 结 点 所 在 的 层 , 在 该 层 的 序号 ( 按 满 二 叉 树 计算 ) 

和 

在 顺序 存储 结构 中 ,二 叉 树 的 每 一 个 结 点 ,根据 它 所 在 的 层 、 在 该 层 的 排序 ( 按 满 二 又 树 
计 ) ,都 有 一 个 固定 的 序号 。 如 图 6-2 所 示 , 根 结 点 的 序号 为 0; 第 i 层 结 点 的 序号 从 2 一 一 1 一 
2 一 2; 序号 为 j 的 结 点 ,其 所 处 的 层 i 是 | log;(j 十 2) |; 其 在 层 i 中 的 排序 k=j 十 2 一 2 ; 其 
双亲 序号 为 [ (j 一 1)/2 |]; 其 左右 孩子 序号 分 别 为 2j 十 1 和 2j 十 2。 除 了 根 结 点 ,序号 为 奇数 
的 结 点 是 其 双亲 的 左 孩子 , 它 的 右 兄 弟 的 序号 是 它 的 序号 十 1; 序号 为 偶数 的 结 点 是 其 双亲 
的 右 孩 子 , 它 的 左 兄弟 的 序号 是 它 的 序号 一 1。 以 序号 为 5 的 结 点 为 例 , 它 处 于 第 3 层 ,而 3 
等 于 | log:(5 十 2) |; 它 在 第 3 层 中 的 排序 是 3; 其 双亲 序号 为 2; 其 左右 孩子 序号 分 别 为 11 
和 12; 它 是 其 双亲 的 左 孩子 ; 它 的 右 兄弟 的 序号 是 6。i 层 的 满 二 叉 树 ,其 结 点 总 数 为 
2 


GD 根 结 点 空 结 点 


SqBiTree 
= 


(2) 2 
@ 外 MAX_TREE_SIZE 
(a) 二 又 树 (b) 存储 表示 
图 6-1 二 叉 树 的 顺序 存储 结构 图 6-2 ”顺序 存储 结构 的 二 叉 树 序号 


注 ; 圈 内 数字 为 该 结 点 在 数组 中 的 序号 
显然 ,在 顺序 存储 结构 中 , 按 层 序 输 入 二 又 树 是 最 方便 的 。 当 最 后 一 个 结 点 的 值 输入 


后 ,输入 给 定 符号 表示 结束 。 二 叉 树 的 顺序 存储 结构 适合 存 完全 二 叉 树 或 近似 完全 二 叉 树 。 
第 10 章 的 树 形 选择 排序 和 堆 排序 ,以 及 第 11 章 的 多 路 平衡 归并 和 置换 -选择 排序 都 要 建立 
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完全 二 又 树 , 故 采 用 顺序 存储 结构 。 

bo6-1. cpp 是 采用 顺序 存储 结构 的 基本 操作 函数 ,main6-1. cpp 是 检验 这 些 基 本 操作 的 
主 程序 。main6-1. cpp、main6-2. cpp 和 main6-3. cpp 采用 了 编译 预 处 理 的 “# define CHAR 
1”、“# 计 CHAR” 等 命令 。 这 样 ,只 要 将 这 些 程序 的 第 2 行 和 第 3 行 其 中 之 一 作为 注释 行 ， 
程序 就 可 以 分 别 在 结 点 类 型 为 整 型 或 字符 型 的 情况 下 应 用 而 不 用 做 其 他 改动 。 

// bo6-1.cpp 二 叉 树 的 顺序 存储 (存储 结构 由 c6-1.h 定义) 的 基本 操作 (23 个 ) 

间 define ClearBiTree InitBiTree // 在 顺序 存储 结构 中 ,两 函数 完全 一 样 


间 define DestroyBiTree InitBiTree // 在 顺序 存储 结构 中 ,两 函数 完全 一 样 
void InitBiTree( SqBiTree T) 
{ // 构造 空 二 叉 树 T。 因 为 了 是 数组 名 , 故 不 需要 & 
int i; 
for(i=0;i<MAX TREE SIZE;i++) 
T[ 订 = Nil; // 初 值 为 空 (Nil 在 主 程 中 定义 ) 


} 
void CreateBiTree( SqBiTree T) 
{ // 按 层 序 次 序 输入 二 叉 树 中 结 点 的 值 (字符 型 或 整 型 ) ,构造 顺序 存储 的 二 叉 树 了 
int i=0; 
InitBiTree(T); // 构造 空 二 叉 树 T 
非 证 CHAR // CHAR 值 为 非 零 , 结 点 类 型 为 字符 
int n; 
char s[MAX_TREE SIZE|; 
printf(" 请 按 层 序 输 入 结 点 的 值 (字符 ) ,空格 表示 空 结 点 , 结 点 数 态 %d:\n" ,MAX_TREE_SIZE) ; 
gets(s); // 输入 字符 串 
n= strlen(s); // 求 字 符 串 的 长 度 
for(;i<nii++ ) // 将 字符 串 赋值 给 T 
T[i] = s[i]; 
间 else // CHAR 值 为 零 , 结 点 类 型 为 整 型 
printf(" 请 按 层 序 输入 结 点 的 值 ( 整 型 ) ,0 表示 空 结 点 , 输 999 结束 。 结 点 数 三 %d:\n"， 
MRAX_TREE SIZE); 
while(1) // 永 真 循环 
{ scanf("%d",&T[i]); // 按 层 序 依次 输入 
if(T[i] == 999) // 输入 结束 
{ 了 [让 = Nil; // 恢复 为 空 结 点 
break; // 跳出 循环 
} 
i++;i // 计数 加 1 
} 
间 endif 
for(i=1;i<<MAX TREE SIZE;i++ ) // 从 第 2 个 ( 非 根 ) 结 点 开始 检查 
if(T[ 订 !=Nil&g&TL(i+1)/2- 1]==Nil) // 此 结 点 不 空 但 无 双亲 
{ printf(" 出 现 无 双亲 的 非 根 结 点 "form"\n".T[i]); 
exit(OVERFLOW) ; 
} 
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Status BiTreeEmpty( SqBiTree T) 
{ // 初始 条 件 : 二 叉 树 T 存 在 。 操 作 结果 : 若 了 为 空 二 叉 树 , 则 返回 TRUE; 否则 FALSE 
if(T[0] == Nil) // 根 结 点 为 空 , 则 树 空 
return TRUE; 
else 
return FALSE; 
} 
int BiTreeDepth( SqBiTree T) 
{ // 初始 条 件 : 二 叉 树 了 存在 。 操 作 结 果 : 返回 了 的 深度 
int i; 
证 (T[0] == Nil) // 根 结 点 为 空 , 则 树 空 
return 0; // 空 树 的 深度 为 0 
for(i = MAX_TREE SIZE - 1;i>=0;i 一 ) // 从 数组 的 后 面向 前 找 起 
if(CTLi]!= Nil) // 找到 最 后 一 个 结 点 ,其 序号 为 i 
break; 
return (int)(1og(i+1)/1og(2) +1.1); // 序号 为 i 的 结 点 的 深度 就 是 树 的 深度 
} 
Status Root(SqBiTree T,TElemType &e) 
// 初始 条 件 : 二 又 树 T 存 在 
// 操作 结果 : 当 T 不 空 ,用 e 返 回 T 的 根 ,返回 OK; 否则 返回 ERROR,e 无 定义 
if(BiTreeEmpty(T)) // T 空 
return ERROR; 


else 
{ e=T[0]; 
return OK; 


} 
TElemType Value(SqBiTree T,position e) 
{ // 初始 条 件 : 二 叉 树 了 存 在 ,e 是 了 中 某 个 结 点 (的 位 置 ) 
// 操作 结果 : 返回 处 于 位 置 e( 层 ,本 层 序号 ) 的 结 点 的 值 
return T[int(pow(2,e. level -1) + e.order - 2)]; 
} 
Status Assign(SqBiTree T,position e.TElemType value) 
{ // 初始 条 件 : 二 又 树 了 存在 ,e 是 了 中 某 个 结 点 (的 位 置 ) 
// 操作 结果 : 给 处 于 位 置 e( 层 ,本 层 序号 ) 的 结 点 赋 新 值 value 
int i= int(pow(2,e.level-1)+e.order-2); // 将 层 、 本 层 序号 转 为 数组 的 序号 
if(il= 0&&value!1=Nil&&TL(i+1)/2-1]==Nil) // 不 是 根 结 点 , 值 非 空 ,但 双亲 为 空 


return ERROR; 

else if(value == Nilg&(T[ix2+1]!1= Nil||T[ix*2+2]!= Nil)) // 给 双亲 赋 空 值 但 有 孩子 结 点 
return ERROR; 

T[i] = value; // 以 上 2 种 情况 之 外 ,给 结 点 赋 新 值 

return OK; 


} 
TElemType Parent(SqBiTree T.TElemType e) 
{ // 初始 条 件 : 二 叉 树 T 存 在 ,e 是 了 中 某 个 结 点 
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// 操作 结果 : 若 e 是 T 的 非 根 结 点 , 则 返回 它 的 双亲 ; 否则 返回 “ 空 ” 
int i; 
if(T[0] == Nil) // 空 树 
return Nil; // 返回 “ 空 ” 
for(i=1;i<= MAX_TREE _ SIZE 一 1;i++ ) // 从 二 叉 树 的 第 2 个 结 点 开始 查找 
if(T[i] == e) // 找到 e 
return TL(i+1)/2-1]; // 返回 其 双亲 结 点 的 值 
return Nil; // 未 找到 e 
} 
TElemType LeftChild(SqBiTree T.TElemType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 左 孩子 。 若 e 无 左 孩子 , 则 返回 “ 空 
int i; 
for(i= 0;i<= (MRX_ TREE SITZE- 2)/2;i++ ) // 从 了 T 的 第 1 个 结 点 到 最 后 一 个 可 能 有 左 孩 子 的 结 点 
if(T[i] == e) // 找到 e 
return TLix* 2+1]; // 返回 e 的 左 孩 子 的 值 
return Nil; // 未 找到 e 
} 
TElemType RightChild(SqBiTree T,TElemType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 右 孩 子 。 若 e 无 右 孩 子 , 则 返回 * 空 ” 
int i; 
for(i=0;i<= (MAX_TREE_SIZE -3)/2;i++ ) // 从 了 T 的 第 1 个 结 点 到 最 后 一 个 可 能 有 右 孩 子 的 结 点 
if(T[i] == e) // 找到 e 
return T[ix2+2]; // 返回 e 的 右 孩 子 的 值 
return Nil; // 未 找到 e 
TElemType LeftSibling(SqBiTree T,TElemType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 左 兄 弟 。 若 e 是 了 T 的 左 孩 子 或 无 左 兄 弟 , 则 返回 “ 空 
int i; 
if(T[0] == Nil) // 空 树 
return Nil; // 返回 “ 空 ” 
for(i=1;i<<= MAX_TREE_SIZE 一 1;i++ ) // 从 二 叉 树 T 的 第 2 个 结 点 开始 查找 
if(T[i] == e&&i%2==0) // 找到 e 且 其 序号 为 偶数 (是 右 孩 子 ) 
return TLi- 1]; // 返回 e 的 左 兄 弟 的 值 
return Nil; // 未 找到 e 
} 
TElemType RightSibling( SqBiTree T.TElemType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 右 兄弟 。 若 e 是 T 的 右 孩 子 或 无 右 兄 弟 , 则 返回 “ 空 
int i; 
i£(T[0] == Nil) // 空 树 
return Nil; // 返回 “ 空 ” 
for(i=1;i<<= MAX_TREE SIZE 一 2;i++ ) // 从 二 叉 树 了 的 第 2 个 结 点 开始 查找 
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if(T[i] == e&&i%2) // 找到 e 且 其 序号 为 奇数 (是 左 孩 子 ) 
return T[i+1]; // 返回 e 的 右 兄 弟 的 值 
return Nil; // 未 找到 e 
} 
void Move( SqBiTree q,int j,SqBiTree T,int i) // InsertChild( ) 用 到 。 新 增 
{ // 把 从 qq 的 j 结 点 开始 的 子 树 移 为 从 T 的 谋 结 点 开始 的 子 树 
if(i>= MAX_TREE_SIZE) // i 结 点 超出 了 存储 范围 
exit(OVERFLOW) ; 
if(q[2*j+1]!1= Nil) // q 的 左 子 树 不 空 
Move(q,(2*j+1),T,(2*i+1)); // 把 q 的 j 结 点 的 左 子 树 移 为 了 的 i 结 点 的 左 子 树 
if(q[2* j+2]!= Nil) // q 的 右 子 树 不 空 
Move(q,(2¥*j+2),T,(2x*i+2)); // 把 gq 的 j 结 点 的 右 子 树 移 为 了 的 i 结 点 的 右 子 树 
TLi 订 =qLjj; // 把 gq 的 j 结 点 移 为 了 的 i 结 点 
q[j]=Nil; // 把 q 的 j 结 点 置 空 
} 
void InsertChild(SqBiTree T,TElemType p,int LR,SqBiTree c) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,p 是 了 中 某 个 结 点 的 值 ,LR 为 0 或 1， 


炉 非 空 二 叉 树 c 与 了 不 相交 且 右 子 树 为 空 

// 操作 结果 : 根据 LR 为 0 或 1, 插 入 c 为 了 中 p 结 点 的 左 或 右 子 树 。 
// p 结 点 的 原 有 左 或 右 子 树 则 成 为 c 的 右 子 树 

int j,k; 


for(j = 0;j 一 int(pow(2,BiTreeDepth(T))) -1;j++ ) // 查找 p 的 序号 
if(T[j] == p) // j 为 p 的 序号 
break; 
k=2xj+1+LR; //k 为 p 的 左 或 右 孩子 的 序号 
if(T[k]!= Nil) // p 原来 的 左 或 右 孩 子 不 空 
Move(T,k,c,2); // 把 从 T 的 k 结 点 开始 的 子 树 移 为 c 的 右 子 树 
Move(c,0,T,k); // 把 树 c 移 为 从 T 的 上 结 点 开始 的 子 树 
} 
typedef int QElemType; // 定义 队列 元 素 类 型 为 整 型 (序号 ) 
间 include"c3-2.h" // 链 队列 
# include" bo3-2.cpp" // 链 队列 的 基本 操作 
Status DeleteChild( SqBiTree T,position p,int LR) 


{ // 初始 条 件 : 二 又 树 了 存在 ,p 指向 了 中 某 个 结 点 ,LR 为 0 或 1 
// 操作 结果 : 根据 LR 为 0 或 1, 删 除了 中 p 所 指 结 点 的 左 或 右 子 树 
int i; 
Status k= OK; // 队列 不 空 的 标志 
LinkQueue q; 


InitQueue(q); // 初始 化 队列 ,用 于 存放 待 删除 的 结 点 
i= (int)pow(2,p. level 一 1) +p.order -2; // 将 层 、 本 层 序 号 转 为 数组 的 序号 
i£(T[] == Nil) // 此 结 点 空 
return ERROR; 
i=ix2+1+LR; // 待 删除 子 树 的 根 结 点 在 数组 中 的 序号 
while(k) 
{ if(T[2x*i+1]!1= Nil) // 左 结 点 不 空 
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EnQueue(q,2x*i+1); // 人 队 左 结 点 的 序号 
证 (CTL2* it+2]!= Nil) // 右 结 点 不 空 
Enoueue(q,2* i+2); // 和 人 队 右 结 点 的 序号 
了 [ 订 = Nil; // 删除 此 结 点 
k= DeQueue(q,i); // 出 队 结 点 的 序号 ,其 值 赋 给 ,成功 ( 队 列 不 空 ) 返 回 OK; 否则 返回 ERROR 
} 
return OK; 
} 
void( x VisitFunc)(TElemType); // 函数 变量 
void PreTraverse(SqBiTree T,int e) 
{ // 递归 先 序 遍历 二 叉 树 了 中 序号 为 e 的 子 树 ,Pre0rderTraverse() 调 用 
VisitFunc(T[e]); // 访问 树 了 中 序号 为 e 的 结 点 
if(T[2* e+1]!= Nil) // 序号 为 e 的 结 点 的 左 子 树 不 空 
PreTraverse(T,2*e+1); // 递归 先 序 遍 历 树 T 中 序号 为 e 的 结 点 的 左 子 树 
让 (CT[2* e+2]!= Nil) // 序号 为 e 的 结 点 的 右 子 树 不 空 
PreTraverse(T,2* e+2); // 递归 先 序 遍 历 树 T 中 序号 为 e 的 结 点 的 布 子 树 
} 
void PreOrderTraverse( SqBiTree T,void(% Visit)(TElemType)) 
{ // 初始 条 件 : 二 叉 树 存在 ,Visit 是 对 结 点 操作 的 应 用 函数 
// 操作 结果 : 先 序 遍 历 T, 对 每 个 结 点 调用 函数 Visit 一 次 且 仅 一 次 
VisitFunc = Visit; 
if(1BiTreeEmpty(T)) // 树 不 空 
PreTraverse(T,0); // 递归 先 序 遍历 树 了 中 序号 为 0 的 树 ( 树 了 自身 ) 
printf("\n"); 
} 
void InTraverse( SqBiTree T.int e) 
{ // 递归 中 序 遍 历 二 叉 树 了 中 序号 为 e 的 子 树 ,InOrderTraverse() 调 用 
if(T[2x*e+1]1= Nil) // 序号 为 e 的 结 点 的 左 子 树 不 空 
InTraverse(T,2* e+1); // 递归 中 序 遍 历 树 了 中 序号 为 e 的 结 点 的 左 子 树 
VisitFunc(T[e]); // 访问 树 了 中 序号 为 e 的 结 点 
if(T[2x*e+2]1= Nil) // 序号 为 e 的 结 点 的 右 子 树 不 空 
InTraverse(T,2* e+2); // 递归 中 序 遍 历 树 T 中 序号 为 e 的 结 点 的 右 子 树 
} 
void InOrderTraverse(SqBiTree T.void(%* Visit)(TElemType)) 
// 初始 条 件 : 二 叉 树 存在 .Visit 是 对 结 点 操作 的 应 用 函数 
// 操作 结果 : 中 序 遍 历 f, 对 每 个 结 点 调用 函数 Visit 一 次 且 仅 一 次 
VisitFunc = Visit; 
if(1BiTreeEmpty(T)) // 树 不 空 
InTraverse(T,0); // 递归 中 序 遍 历 树 了 中 序号 为 0 的 树 ( 树 T 自 身 ) 
printf("\n"); 
} 
void PostTraverse( SqBiTree T.int e) 
{ // 递归 后 序 遍 历 二 叉 树 了 中 序号 为 e 的 子 树 ,PostOrderTraverse() 调 用 
if(TL2* e+1]!= Nil) // 序号 为 e 的 结 点 的 左 子 树 不 空 
PostTraverse(T.2* e+1); // 递归 后 序 遍历 树 T 中 序号 为 e 的 结 点 的 左 子 树 


131 


数据 结构 算法 解析 
132 


ifE(TL2* e+2]1!= Nil) // 序号 为 e 的 结 点 的 右 子 树 不 空 
PostTraverse(T,2* e+2); // 递归 后 序 遍 历 树 了 中 序号 为 e 的 结 点 的 右 子 树 
VisitFunc(T[e]); // 访问 树 了 中 序号 为 e 的 结 点 
} 
void PostOrderTraverse( SqBiTree T,void(% Visit)(TElemType)) 
{ // 初始 条 件 : 二 叉 树 了 存 在 ,Visit 是 对 结 点 操作 的 应 用 函数 
// 操作 结果 : 后 序 遍 历 了 ,对 每 个 结 点 调用 函数 Visit 一 次 且 仅 一 次 
VisitFunc = Visit; 
if(1BiTreeEmpty(T)) // 树 不 空 
PostTraverse(T,0); // 递归 后 序 遍 历 树 了 中 序号 为 0 的 树 ( 树 了 自身 ) 
printf("\n"); 
} 
void LevelOrderTraverse( SqBiTree T,void(# Visit)(TElemType)) 
{ // 层 序 遍历 二 叉 树 了 
int i = MAX_TREE SIZE— 1,j; 
while(T[i] == Nil) 
i 一 ; // 找到 最 后 一 个 非 空 结 点 的 序号 
for(j=0;j<=i;j++) // 从 根 结 点 起 , 按 层 序 遍历 二 叉 树 
if(T[j]!= Nil) 
Visit(T[j]); // 只 遍历 非 空 的 结 点 
printf("\n"); 
} 
void Print(SqBiTree T) 
// 逐 层 、 按 本 层 序号 输出 二 叉 树 了 
int j,k; 


position p; 
TElemType e; 
for(j = 1;j 一 = BiTreeDepth(T);j++ ) // j 为 当前 层 
{ printf(" 第 sd 层 :",j); 
p. level = j; // 当前 结 点 所 在 层 
for(k= 1;k 一 = pow(2,j—1);k++ ) 
{ p.order =k; // 当前 结 点 在 本 层 的 顺序 
e= Value(T,p); // 该 结 点 的 值 赋 给 e 
if(el= Nil) // e 非 空 
printf("%d:"form"",k,e); // 输出 在 本 层 的 顺序 及 值 
} 
printf("\n"); 


// func6-1. cpp 利用 条 件 编译 ,在 主 程序 中 选择 结 点 的 类 型 ,访问 树 结 点 的 函数 
间 include"cl.h" 
提 if CHAR // CHAR 值 为 非 零 , 结 点 类 型 为 字符 

typedef char TElemType; // 定义 树 元 素 类 型 为 字符 型 

TElemType Nil =''; // 设 字符 型 以 空格 符 为 空 


第 6 章 ” 树 和 二 又 树 


间 define form "sc" // 输入 输出 的 格式 为 $c 
间 else // CHAR 值 为 零 , 结 点 类 型 为 整 型 
typedef int TElemType; // 定义 树 元 素 类 型 为 整 型 
TElemType Nil = 0; // 设 整 型 以 0 为 空 
提 define form "%d" // 输入 输出 的 格式 为 %d 
间 endif 
void visit(TElemType e) 
{ printf(form”",e); // 定义 CHRR 为 1 时 ,以 字符 格式 输出 ; CHAR 为 0 时 ,以 整 型 格式 输出 
} 


// main6-1.cpp 检验 bo6-1.cpp 的 主 程序 ,利用 条 件 编译 选择 数据 类 型 为 char 或 int 
// #define CHAR 1 // 字符 型 。 第 2 行 
间 define CHAR 0 // 整 型 (二 者 选 一 )。 第 3 行 
间 include"func6-1.cpp" // 利用 条 件 编译 ,在 主 程序 中 选择 结 点 的 类 型 ,访问 树 结 点 的 函数 
间 include"c6-1.h" // 二 叉 树 的 顺序 存储 结构 
间 include"bo6-1.cpp" // 二 叉 树 顺序 存储 结构 的 基本 操作 
void main() 
{ 
Status i; 
int j; 
position p; 
TElemType e; 
SqBiTree T,s; 
InitBiTree(T); // 初始 化 二 叉 树 T 
CreateBiTree(T); // 建立 二 叉 树 了 
printf(" 建 立 二 叉 树 后 , 树 空 否 ?%d(1: 是 0: 否 )。 树 的 深度 =%d。\n" ,BiTreeEmpty(T) ， 
BiTreeDepth(T) ); 
= Root(T,e); // 将 二 叉 树 T 的 根 的 值 赋 给 e 
if(i) // 二 叉 树 了 非 空 
printf(" 二 叉 树 的 根 为 "form"。\n" ,e); 
else 
printf(" 树 空 ,无 根 。\n"); 
printf(" 层 序 遍 历 二 叉 树 : \n"); 
LevelOrderTraverse(T,visit); // 层 序 遍 历 二 叉 树 了 
printf(" 中 序 遍 历 二 叉 树 : \n"); 
InOrderTraverse(T,visit); // 中 序 遍 历 二 叉 树 了 T 
printf(" 后 序 遍 历 二 叉 树 : \n"); 
PostOrderTraverse(T,visit); // 后 序 遍 历 二 叉 树 Tf 
printf(" 请 输入 待 修改 结 点 的 层 号 本 层 序号 : "); 
scanf("%d%d".&p. level.&p.order); 
e= Value(T,p); // 将 二 叉 树 了 中 位 置 p 的 结 点 的 值 赋 给 e 
printf(" 待 修改 结 点 的 原 值 为 "form" ,请 输入 新 值 : " .e); 
scanf("% x*c"form"% x*c",&e); 
Assign(T,p,e); // 将 e 的 值 赋 给 二 又 树 T 中 位 置 p 的 结 点 
printf(" 先 序 遍 历 二 叉 树 : \n"); 


134 


数据 结构 算法 解析 


PreOrderTraverse(T,visit); // 先 序 遍历 二 叉 树 了 T 
printf(" 结 点 "form" 的 双亲 为 "form" ,左右 孩子 分 别 为 ",e,Parent(T,e)); 
printf(form"、"form" ,左右 兄弟 分 别 为 ",LeftChild(T,e),RightChild(T,e)); 
printf(form", "form", \n",LeftSibling(T,e) ,RightSibling(T,e)); 
InitBiTree(s); // 初始 化 二 叉 树 s 
printf(" 建 立 右 子 树 为 空 的 树 s: \n"); 
CreateBiTree(s); // 建立 二 叉 树 s 
printf(" 树 s 插 到 树 了 中 ,请 输入 树 了 中 树 s 的 双亲 结 点 s 为 左 (0) 或 右 (1) 子 树 :"); 
scanf(form"%d",&e,&j); 
InsertChild(T,e,j,s); 
// 将 树 s 插 到 树 了 中 , 结 点 。 作 为 树 s 的 双亲 结 点 ,根据 j 的 值 确定 树 s 是 e 的 左 或 右 子 树 
Print(T); // 逐 层 、 按 本 层 序号 输出 二 叉 树 了 
printf(" 删 除 子 树 ,请 输入 其 根 结 点 的 双亲 的 层 号 本 层 序号 其 为 双亲 的 左 (0) 或 右 (1) 子 树 :"); 
scanf("%d%d%d",&p. level,&p.order,&j); 
DeleteChild(T,p,j); // 删除 二 叉 树 T 中 位 置 p 结 点 的 左 (j = 0) 或 右 (j=1) 子 树 
Print(T); // 逐 层 、 按 本 层 序号 输出 二 又 树 了 
ClearBiTree(T); // 清空 二 又 树 了 
printf(" 清 空 二 叉 树 后 , 树 空 否 ?%d(1: 是 0: 否 )。 树 的 深度 =%d。\n" ,BiTreeEmpty(T)， 
BiTreeDepth(T)); 
i= Root(T,e); // 将 二 叉 树 了 的 根 的 值 赋 给 e 
if£(i) // 二 叉 树 了 T 非 空 
printf(" 二 叉 树 的 根 为 "form" 。\n",e); 
else // 二 又 树 T 为 空 
printf(" 树 空 ,无 根 。\n"); 
} 


程序 运行 结果 : 


请 按 层 序 输入 结 点 的 值 ( 整 型 ),0 表示 空 结 点 , 输 999 结束 。 结 点 数 三 100: 
12345067999w( 见 图 6-3) 

建立 二 叉 树 后 , 树 空 否 ? 0(1: 是 0: 否 )。 树 的 深度 = 4。 
二 叉 树 的 根 为 1。 

层 序 遍 历 二 叉 树 : 

生存 

中 序 遍 历 二 叉 树 : 

7425136 

后 序 遍 历 二 叉 树 : 

7452631 

请 输入 待 修改 结 点 的 层 号 本 层 序号 : 2 2 图 6-3 运行 main6-1. cpp 生成 的 二 叉 树 
待 修改 结 点 的 原 值 为 3, 请 输入 新 值 : 8 

先 序 遍 历 二 叉 树 : 

1247586 

结 点 8 的 双亲 为 1, 左右 孩子 分 别 为 0.6: 左 右 兄弟 分 别 为 2.0。 

建立 右 子 树 为 空 的 树 s: 

请 按 层 序 输入 结 点 的 值 ( 整 型 ) ,0 表示 空 结 点 , 输 999 结束 。 结 点 数 和 过 100: 
1011013140017999w ( 见 图 6-4) 
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树 s 插 到 树 了 中 ,请 输入 树 了 中 树 s 的 双亲 结 点 s 为 左 (0) 或 右 (1) 子 树 : 2 1 ( 见 图 6-5) 


第 大 # i 沁 
有 

第 3 层 : 1:42: 104:6 
第 4 层 : 1; 7 3: 114: 5 
第 5 层 : 5: 13 6: 14 
第 6 层 : 9: 17 


删除 子 树 ,请 输入 其 根 结 点 的 双亲 的 层 号 本 层 序号 其 为 双亲 的 左 (0) 或 右 (1) 子 树 : 3 2 0 
第 1 层 : 1: 1( 见 图 6-6) 


0 


(0 9 (© 
(0 © WW 与 
3 坦 (3 WW 


人 ® 
图 6-4 碳 子 树 为 空 的 树 s 图 6-5 插入 树 s 后 的 二 叉 树 图 6-6 ”删除 子 树 后 的 二 叉 树 


第 2 层 : 1:22:8 

第 3 层 : 1; 42: 10 4: 6 

第 4 层 : 1:74:5 

清空 二 叉 树 后 , 树 空 否 ? 1(1: 是 0: 否 )。 树 的 深度 = 0。 


树 空 ,无 根 。 
// c6-2.h 二 叉 树 的 二 叉 链 表 存 储 结构 。 在 教科 书 第 127 页 ( 见 图 6-7) 
typedef struct BiTNode BiTree BiTNode 
{ TElenType data; // 结 点 的 值 [ichitd |daa| renild 
BiTNode x* lchild, * rchild; // 左右 孩子 指针 
}BiTNode, x BiTree; 人 
BirNode | BiTNode 


二 叉 树 的 二 又 链表 存储 结构 删除 和 插入 结 
点 或 子 树 都 很 灵活 。 结 点 动态 生成 ,可 充分 利用 
存储 空间 。 图 6-8 是 图 6-1(a) 所 示 二 又 树 的 二 又 链表 存储 结构 。bo6-2. cpp 和 bo6-3. cpp 是 二 
又 链表 存储 结构 的 基本 操作 ,其 中 ,调用 按 先 序 次 序 构造 二 又 链表 的 函数 CreateBiTree () ( 算 
法 6.4) 时 ,不 仅 要 按 先 序 次 序 输入 结 点 的 值 , 而 且 还 要 把 叶子 结 点 的 左右 孩子 指针 和 度 为 1 
的 结 点 的 空 指针 输入 。 其 原因 是 只 根据 结 点 的 先 序 次 序 还 不 能 唯一 确定 二 叉 树 的 形状 。 如 
图 6-9 所 示 ,三 棵 树 的 先 序 次 序 都 是 abc。 这 样 , 在 调用 函数 CreateBiTree () 时 ,输入 abc 就 会 
产生 多 义 性 。 如 果 把 叶子 结 点 的 左右 孩子 指针 和 度 为 1 的 结 点 的 空 指针 (以 表示 , 即 空 
格 ) 也 按 先 序 输入 ,可 以 唯一 确定 二 叉 树 的 形状 。 


图 6-7 二 叉 树 的 二 叉 链表 存储 结构 
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二 
由 @ 
Nur 
: . ~ 
2 
A © © © © 
NUuLL3[INULL [NuLL4INULL 加 输 入 abc (b) 输 入 abuuc (0) 输入 abucuu 
图 6-8 ”二叉树 的 二 叉 链表 存储 图 6-9 三 棵 先 序 遍 历 都 为 abe 的 二 叉 树 


结构 (以 图 6-1(a) 为 例 ) 
二 叉 链 表 存 储 结构 的 许多 基本 操作 都 采用 了 递归 函数 ,因为 二 又 树 的 层 数 是 不 定 的 , 正 
确 采 用 递归 函数 可 简化 编程 。 注 意 到 这 些 递归 函数 的 特点 : 一 是 降 阶 的 ,二 是 有 出 口 的 。 


// bo6-2. cpp 二 又 链表 的 4 个 基本 操作 ,包括 算法 6.1,func8-4. cpp 等 调用 
间 define ClearBiTree DestroyBiTree // 清空 二 叉 树 和 销毁 二 叉 树 的 操作 一 样 


void InitBiTree(BiTree &T) 工 

{ // 操作 结果 : 构造 空 二 叉 树 T( 见 图 6-10) NULL 
ny 图 6-10 空 的 和 销毁 

} 的 二 叉 树 了 


void DestroyBiTree(BiTree &T) 
{ // 初始 条 件 : 二 叉 树 了 T 存 在。 操作 结果 : 销毁 二 叉 树 T( 见 图 6-10) 
if(T) // 非 空 树 
{ DestroyBiTree(T -二 lchild); // 递归 销毁 左 子 树 ,如 无 左 子 树 , 则 不 执行 任何 操作 
DestroyBiTree(T -二 rchild); // 递归 销毁 右 子 树 ,如 无 右 子 树 , 则 不 执行 任何 操作 
free(T); // 释放 根 结 点 
T= NULL; // 空 指针 赋 0 


} 

void PreOrderTraverse(BiTree T,void(# Visit)(TElemType)) 

{ // 初始 条 件 : 二 叉 树 Tf 存 在 ,Visit 是 对 结 点 操作 的 应 用 函数 。 修 改 算 法 6.1 
// 操作 结果 : 先 序 递归 遍历 fT, 对 每 个 结 点 调用 函数 Visit 一 次 且 仅 一 次 
if(T) // 了 不 空 
{ Visit(T- 之 data); // 先 访问 根 结 点 

PreOrderTraverse(T -二 lchild,Visit); // 再 先 序 遍历 左 子 树 
PreOrderTraverse(T -二 rchild,Visit); // 最 后 先 序 遍 历 右 子 树 
} 

} 

void InOrderTraverse(BiTree T.void(% Visit)(TElemType)) 

{ // 初始 条 件 : 二 叉 树 了 存在 ,Visit 是 对 结 点 操作 的 应 用 函数 
// 操作 结果 : 中 序 递归 遍历 Tf, 对 每 个 结 点 调用 函数 Visit 一 次 且 仅 一 次 
if(T) 

{ InOrderTraverse(T -二 lchild,Visit); // 先 中 序 遍 有 历 左 子 树 
Visit(T ->data); // 再 访问 根 结 点 
InOrderTraverse(T -二 rchild,Visit); // 最 后 中 序 遍 历 右 子 树 

} 
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// bo6-3. cpp 二 叉 链表 (存储 结构 由 c6-2.h 定义) 的 基本 操作 (18 个 ) ,包括 算法 6.2 一 算法 6.4 
Status BiTreeEmpty(BiTree T) 
{ // 初始 条 件 : 二 叉 树 了 存在 。 操 作 结 果 : 车 了 为 空 二 又 树 , 则 返回 TRUE; 否则 返回 FALSE 
if(T) 
return FALSE; 
else 
return TRUE; 
} 
int BiTreeDepth(BiTree T) 
{ // 初始 条 件 : 二 叉 树 了 存在 。 操 作 结 果 : 返回 了 的 深度 
int i,j; 
if(!1T) 
return 0; // 空 树 深度 为 0 
i= BiTreeDepth(T -lchild); // i 为 左 子 树 的 深度 ,如 左 子 树 为 空 , 则 为 0 
j= BiTreeDepth(T 了 -rchild); // j 为 右 子 树 的 深度 ,如 右 子 树 为 空 , 则 j 为 0 
return ij?i+1:j+1; // 了 的 深度 为 其 左右 子 树 的 深度 中 的 大 者 +1 
} 
TElemType Root(BiTree T) 
{ // 初始 条 件 : 二 叉 树 了 T 存 在。 操作 结果 : 返回 了 的 根 
if(BiTreeEmpty(T)) // 二 叉 树 T 了 为 空 
return Nil; // 返回 “ 空 ” 
else // 二 叉 树 了 不 空 
return T -data; // 返回 根 结 点 的 值 
} 
TElemType Value(BiTree p) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,p 指向 了 中 某 个 结 点 。 操 作 结 果 : 返回 p 所 指 结 点 的 值 
return p -二 datay 
} 
void Assign(BiTree p,TElemType value) 
{ // 给 p 所 指 结 点 赋值 为 value 
p->data= value; 
} 
typedef BiTree QElemType; // 定义 队列 元 素 为 二 叉 树 的 指针 类 型 
间 include"c3-2.h" // 链 队 列 
间 include"bo3-2.cpp" // 链 队列 的 基本 操作 
BiTree Point(BiTree T.TElemType s) 
{ // 返回 二 叉 树 了 中 指向 元 素 值 为 s 的 结 点 的 指针 。 新 增 
LinkQueue q; 
QElemType a; 
i£(T) // 非 空 树 
{ InitQueue(q); // 初始 化 队列 
EnQueue(q,T); // 根 指针 入 队 
while( 1QueueEmpty(q)) // 队 不 空 
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{ DeQueue(q,a); // 出 队 ,队列 元 素 赋 给 a 
让 (a- 二 data== s) // a 所 指 结 点 的 值 为 s 
return a; // 返回 a 
if(a- 二 lchild) // 有 左 孩 子 
Enoueue(q,a- 二 lchild); // 入 队 左 孩子 
让 (a- 二 rchild) // 有 右 孩 子 
Enoueue(q,a- 二 rchild); // 人 队 碳 孩子 


} 
return NULL; // 二 叉 树 了 中 没有 元 素 值 为 s 的 结 点 
} 
TElemType LeftChild(BiTree T,TElemType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 左 孩 子 。 若 e 无 左 孩 子 , 则 返回 * 空 ” 
BiTree a; 
i£(T) // 非 空 树 
{ a= Point(T,e); // a 是 指向 结 点 e 的 指针 
if(ag&a -lchild) //T 中 存在 结 点 e 且 e 存 在 左 孩 子 
return a ->lchild -data; // 返回 e 的 左 孩 子 的 值 
} 
return Nil; // 其 余 情 况 返 回 “ 空 
} 
TElemType RightChild(BiTree T,TElemType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 右 孩 子 。 若 e 无 右 孩 子 , 则 返回 * 空 ” 
BiTree a; 
i£(T) // 非 空 树 
{ a= Point(T,e); // a 是 指向 结 点 e 的 指针 
让 Ca&g&ga->rchild) //T 了 中 存在 结 点 e 且 e 存 在 右 孩 子 
return a -二 rchild- 二 data; // 返回 e 的 右 孩 子 的 值 
} 
return Nil; // 其 余 情 况 返 回 空 
} 
Status DeleteChild(BiTree p,int LR) // 形 参 了 无 用 
{ // 初始 条 件 : 二 叉 树 了 存在 ,p 指 向 了 中 某 个 结 点 ,LR 为 0 或 1 
// 操作 结果 : 根据 LR 为 0 或 1, 删 除了 中 p 所 指 结 点 的 左 或 右 子 树 
证 (p) // p 不 空 
{ if(LR==0) // 删除 左 子 树 
ClearBiTree(p -二 lchild); // 清空 p 所 指 结 点 的 左 子 树 
else // 删除 右 子 树 
ClearBiTree(p -二 rchild); // 清空 p 所 指 结 点 的 右 子 树 
return OK; 
} 
return ERROR; // p 空 ,返回 ERROR 
} 
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void PostOrderTraverse(BiTree T,void(# Visit)(TElemType)) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,Visit 是 对 结 点 操作 的 应 用 函数 
// 操作 结果 : 后 序 递 归 遍 历 T, 对 每 个 结 点 调用 函数 Visit 一 次 且 仅 一 次 
证 (T) // 了 不 空 
{ PostOrderTraverse(T -二 lchild,Visit); // 先后 序 遍 历 左 子 树 
PostOrderTraverse(T -二 rchild,Visit); // 再 后 序 遍历 右 子 树 
Visit(T -data); // 最 后 访问 根 结 点 


} 
void LevelOrderTraverse(BiTree T,void(% Visit) (TElemType)) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,Visit 是 对 结 点 操作 的 应 用 函数 
// 操作 结果 : 层 序 递归 遍历 T( 利 用 队列 ) ,对 每 个 结 点 调用 函数 Visit 一 次 且 仅 一 次 
LinkQueue q; 
QElemType a; 
i£(T) // T 不 空 
{ InitQueue(q); // 初始 化 队列 q 
EnQueue(q,T); // 根 指针 入 队 
while( 1QueueEmpty(q)) // 队列 不 空 
{ DeQueue(q,a); // 出 队 元 素 ( 指 针 ) , 赋 给 a 
Visit(a- 二 data); // 访问 a 所 指 结 点 
if(a- 二 lchild!= NULL) // a 有 左 孩 子 
EnQueue(q,a -之 lchild); // 入 队 a 的 左 孩子 
if(a- 二 rchild!= NULL) // a 有 右 孩 子 
Enoueue(q,a- 二 rchild); // 入 队 a 的 右 孩 子 
} 
printf("\n"); 


} 
void CreateBiTree(BiTree &T) 
{ // 算法 6.4: 按 先 序 次 序 输入 二 叉 树 中 结 点 的 值 (可 为 字符 型 或 整 型 .在 主 程 中 定义 )， 
// 构造 二 叉 链 表 表 示 的 二 叉 树 T。 变 量 Nil 表示 空 ( 子 ) 树 。 修 改 
TElemType ch; 
scanf(form,&ch); // 输入 结 点 的 值 
if(ch== Nil) // 结 点 的 值 为 空 
T= NULL; 
else // 结 点 的 值 不 为 空 


{ T= (BiTree)malloc(sizeof(BiTNode)); // 生成 根 结 点 


if(1T) 

exit(OVERFLOW) ; 
了 -data= ch; // 将 值 赋 给 了 所 指 结 点 
CreateBiTree(T -二 lchild); // 递归 构造 左 子 树 
CreateBiTree(T -二 rchild); // 递归 构造 右 子 树 


} 
TElemType Parent (BiTree T.TElemType e) 
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{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 车 e 是 了 的 非 根 结 点 , 则 返回 它 的 双亲 ,否则 返回 “ 空 ” 
LinkQueue q; 
QElemType a; 
i£(T) // 非 空 树 
{ InitQueue(q); // 初始 化 队列 
EnQueue(q,T); // 树 根 指针 入 队 
while(!OueueFEmpty(q)) // 队 不 空 
{ DeQueue(q,a); // 出 队 ,队列 元 素 赋 给 a 
if(a->1childg&a->1child->data== el|la->rchildg&a->rchild->data== e) 
// 找到 e( 是 其 左 或 右 孩子 ) 
return a- 盖 data; // 返回 e 的 双亲 的 值 
else // 未 找到 e, 则 入 队 其 左右 孩子 指针 (如 果 非 空 ) 
{ 证 (a->>lchild) // a 有 左 孩 子 
EnQueue(q,a -lchild); // 和 人 队 左 孩 子 指针 
庄 (a- 二 rchild) // a 有 右 孩 子 
Enoueue(q,a- 二 rchild); // 入 队 右 孩 子 指针 


} 
return Nil; // 树 空 或 未 找到 e 
} 
TElemType LeftSibling(BiTree T,TElenType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 左 兄弟 。 若 e 是 了 的 左 孩子 或 无 左 兄 弟 , 则 返回 “ 空 ” 
TElemType ay 
BiTree p; 
i£(T) // 非 空 树 
{ a=Parent(T,e); // a 为 e 的 双亲 
if(al= Nil) // 找到 e 的 双亲 
{ p=Point(T,a); // p 为 指向 结 点 a 的 指针 
if(p -二 lchild&&p->rchild&&gp- 二 rchild- 二 data==e) // p 存 在 左右 孩子 上 且 右 孩子 是 e 
return p -二 lchild- 二 data; // 返回 p 的 左 孩 子 (e 的 左 兄弟 ) 


return Nil; // 其 余 情 况 返 回 空 
} 
TElemType RightSibling(BiTree T,TElemType e) 
{ // 初始 条 件 : 二 叉 树 了 存在 ,e 是 了 中 某 个 结 点 
// 操作 结果 : 返回 e 的 右 兄弟 。 若 e 是 了 的 右 孩 子 或 无 右 兄 弟 , 则 返回 “ 空 
TElemType a; 
BiTree p; 
iE(T) // 非 空 树 
{ a= Parent(T,e); // a 为 e 的 双亲 
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if(al= Nil) // 找到 ee 的 双亲 
{ p=Point(T,a); // Pp 为 指向 结 点 a 的 指针 
话 (p -二 lchild&&gp->rchild&&gp- 二 lchild->data==e) // p 存 在 左右 孩子 上 是 左 孩子 是 e 
return p -二 rchild- 盖 data; // 返回 p 的 右 孩 子 (e 的 右 兄 弟 ) 


} 
return Nil; // 其 余 情 况 返 回 空 
} 
Status InsertChild(BiTree p,int LR,BiTree c) // 形 参 T 无 用 
{ // 初始 条 件 : 二 叉 树 了 存 在 ,p 指向 了 中 某 个 结 点 ,LR 为 0 或 1， 


// 非 空 二 叉 树 c 与 了 不 相交 且 右 子 树 为 空 
// 操作 结果 : 根据 IR 为 0 或 1, 插 入 c 为 了 中 p 所 指 结 点 的 左 或 右 子 树 。p 所 指 结 点 的 
dd 原 有 左 或 右 子 树 则 成 为 c 的 右 子 树 


证 (p) // p 不 空 
{ 证 (LR== 0) // 把 二 叉 树 c 插 为 所 指 结 点 的 左 子 树 
{ c->rchild=p->lchild; // p 所 指 结 点 的 原 有 左 子 树 成 为 c 的 右 子 树 
pP->1lchild= ci // 二 叉 树 c 成 为 p 的 左 子 树 
} 
else // LR==1, 把 二 又 树 c 插 为 p 所 指 结 点 的 右 子 树 
{ c->rchild=p- 盖 rchild; // p 所 指 结 点 的 原 有 右 子 树 成 为 c 的 右 子 树 
p- 记 rchild=c; // 二 叉 树 c 成 为 p 的 右 子 树 
} 
return OK; 
return ERROR; // p 空 

} 

typedef BiTree SElemType; // 定义 栈 元 素 为 二 叉 树 的 指针 类 型 

# include"c3-1.h" // 顺序 栈 

间 include"bo3-1.cpp”// 顺序 栈 的 基本 操作 

void InOrderTraversel (BiTree T,void(# Visit)(TElemType)) 

{ // 采用 二 叉 链表 存储 结构 ,Visit 是 对 数据 元 素 操作 的 应 用 函数 。 修 改 算法 6.3 
// 中 序 遍 历 二 叉 树 了 的 非 递归 算法 (利用 栈 ) ,对 每 个 数据 元 素 调用 函数 Visit 
SqStack S; 

InitStack(S); // 初始 化 栈 S 
while(T| | !StackEmpty(S)) // 当 二 又 树 了 不 空 或 者 栈 不 空 
{ i£(T) // 二 叉 树 了 不 空 
{ // 根 指针 进 栈 ,遍历 左 子 树 
Push(S,T); // 入 栈 根 指针 
T=T 了 -之 lchild; //T 指 向 其 左 孩子 
else // 根 指针 退 栈 , 访 问 根 结 点 ,遍历 右 子 树 
{ Pop(S,T); // 出 栈 根 指针 
Visit(T- 二 data); // 访问 根 结 点 
T=T->rchild; //T 指 向 其 右 孩 子 
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} 
printf("\n"); 
} 
void InOrderTraverse2(BiTree T,void(# Visit)(TElemType)) 
{ // 采用 二 又 链表 存储 结构 ,Visit 是 对 数据 元 素 操作 的 应 用 函数 。 算 法 6.2, 有 改动 


// 中 序 遍 历 二 又 树 了 的 非 递归 算法 (利用 栈 ) ,对 每 个 数据 元 素 调用 函数 Visit 
SqStack S; 


BiTree p; 
InitStack(S); // 初始 化 栈 S 
Push(S,T); // 根 指针 进 栈 ( 无 论 空 否 ) 
while( 1StackEmpty(S)) // 栈 不 空 
{ while(GetTop(S,p) &&p) // 栈 顶 元 素 不 为 空 指针 
Push(S,p -二 lchild); // 向 左 走 到 尽头 ,人 栈 左 孩子 指针 
Pop(S,p); // 空 指针 退 栈 , 退 掉 最 后 人 栈 的 空 指针 
if(1StackEmpty(S)) // 访问 结 点 ,向 右 一 步 
{ Pop(S,p); // 弹出 栈 顶 元 素 ( 非 空 指针 ) 
Visit(p -二 data); // 访问 刚 弹出 的 结 点 (目前 栈 顶 元 素 的 左 孩子 ) 
Push(S,p -二 rchild); // 人 栈 其 右 孩 子 指针 


} 
printf("\n"); 


// main6-2. cpp 检验 二 叉 链表 基本 操作 的 主 程序 
间 define CHAR 1 // 字符 型 。 第 2 行 
//#define CHAR 0 // 整 型 (二 者 选 一 )。 第 3 行 
间 include"func6-1.cpp" // 利用 条 件 编译 ,在 主 程序 中 选择 结 点 的 类 型 ,访问 树 结 点 的 函数 
间 include"c6-2.h" // 二 叉 树 的 二 叉 链 表 存 储 结构 
间 include"bo6-2.cpp" // 二 叉 树 的 二 叉 链表 存储 结构 的 4 个 基本 操作 ,func8-4. cpp 等 调用 
间 include"bo6-3.cpp" // 二 叉 树 的 二 叉 链表 存储 结构 的 18 个 基本 操作 
void main() 
{ 
int i; 
BiTree T,p,c; 
TElemType el ,e2; 
InitBiTree(T); // 初始 化 二 叉 树 了 
printf(" 构 造 空 二 叉 树 后 , 树 空 否 ?%d(1: 是 0: 否 )。 树 的 深度 =%d。\n" ,BiTreeEmpty(T) ， 


BiTreeDepth(T)); 
el = Root(T); // el 为 二 又 树 了 的 根 结 点 的 值 
if(el!l= Nil) 

printf(" 二 叉 树 的 根 为 "form"。\n" ,el); 
else 


printf(" 树 空 ,无 根 。\n"); 
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间 i£ CHAR // CHAR 值 为 非 零 , 结 点 类 型 为 字符 

printf(" 请 按 先 序 输 入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 子 树 的 二 叉 树 ): \n"); 
间 else // CHAR 值 为 零 . 结 点 类 型 为 整 型 

printf(" 请 按 先 序 输入 二 叉 树 (如 : 1 2 0 0 0 表示 1 为 根 结 点 ,2 为 左 子 树 的 二 叉 树 ): \n"); 
间 endif 

CreateBiTree(T); // 建立 二 叉 树 了 

printf(" 建 立 二 叉 树 后 , 树 空 否 ?%d(1: 是 0: 否 )。 树 的 深度 =%d。\n" ,BiTreeEmpty(T) 


BiTreeDepth(T)); 
el = Root(T); // el 为 二 叉 树 了 的 根 结 点 的 值 
if(el!l= Nil) 

printf(" 二 叉 树 的 根 为 "form"。\n" ,el); 
else 


printf(" 树 空 , 无 根 。\n"); 
printf(" 中 序 递归 遍历 二 叉 树 : \n"); 
InOrderTraverse(T,visit); // 中 序 递归 遍历 二 叉 树 了 
printf("\n 后 序 递归 遍历 二 叉 树 : \n"); 
PostOrderTraverse(T,visit); // 后 序 递归 遍历 二 叉 树 T 
printf("\n 请 输入 一 个 结 点 的 值 : "); 
scanf("% x*c"form,&el); 
p= Point(T,el); // p 指 向 为 el 的 指针 
printf(" 结 点 的 值 为 "form" 。\n" ,Value(p)); 
printf(" 欲 改变 此 结 点 的 值 , 请 输入 新 值 : "); 
scanf("% x c"form"% xc",&e2); // 后 一 个 % *c 上 吃 掉 回 车 符 ,为 调用 CreateBiTree() 做 准备 
Assign(p,e2); // 将 e2 的 值 赋 给 p 所 指 结 点 ,代替 el 
printf(" 层 序 遍 历 二 叉 树 : \n"); 
LevelOrderTraverse(T,visit); // 层 序 递归 遍历 二 叉 树 T 
el = Parent(T,e2); // 将 二 叉 树 了 中 结 点 e2 的 双亲 的 值 赋 给 el 


if(el!=Nil) 
printf(form" 的 双亲 是 "form",",e2.el); 
else 


printf(form" 没 有 双亲 ,",e2); 
el = LeftChild(T,e2); // 将 二 又 树 了 中 结 点 e2 的 左 孩 子 的 值 赋 给 el 


if(el!l= Nil) 
printf(" 左 孩子 是 "form"," ,el); 
else 


printf(" 没 有 左 孩 子 ,"); 
el = RightChild(T,e2); // 将 二 叉 树 T 中 结 点 e2 的 右 孩 子 的 值 赋 给 el 


if(el!l= Nil) 
printf(" 右 孩子 是 "form" ," ,el); 
else 


printf(" 没 有 右 孩 子 ,"); 
el = LeftSibling(T,e2); // 将 二 叉 树 T 中 结 点 e2 的 左 兄弟 的 值 赋 给 el 
if(el!l= Nil) 

printf(" 左 兄弟 是 "form" ," ,el); 
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else 
printf(" 没 有 左 兄弟 ,"); 
el = RightSibling(T,e2); // 将 二 叉 树 T 中 结 点 e2 的 右 兄 弟 的 值 赋 给 el 
if(el!=Nil) 
printf(" 右 兄弟 是 "form" 。\n" .el); 
else 
printf(" 没 有 右 见 弟 。\n"); 
InitBiTree(c); // 初始 化 二 叉 树 c 
printf(" 请 构造 一 个 右 子 树 为 空 的 二 叉 树 c: \n"); 
提 if CHAR // CHAR 值 为 非 零 , 结 点 类 型 为 字符 
printf(" 请 按 先 序 输 入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 子 树 的 二 叉 树 ): \n"); 
间 else // CHAR 值 为 零 , 结 点 类 型 为 整 型 
printf(" 请 按 先 序 输 入 二 又 树 ( 如 : 1 2 0 0 0 表示 1 为 根 结 点 ,2 为 左 子 树 的 二 又 树 ) : \n"); 
提 endif 
CreateBiTree(c); // 建立 二 叉 树 c 
printf(" 中 序 递归 遍历 二 叉 树 c: \n"); 
InOrderTraverse(c,visit); // 中 序 递归 遍历 二 叉 树 c 
printf("\n 树 c 插 到 树 T 中 ,请 输入 树 T 中 树 c 的 双亲 结 点 c 为 左 (0) 或 右 (1) 子 树 :"); 
scanf("% *c"form"%d",&el,&i); 
p= Point(T,el); // p 指 向 二 叉 树 T 了 中 将 作为 二 叉 树 c 的 双亲 结 点 的 el 
InsertChild(p,i,c); // 将 树 c 插 入 到 二 又 树 T 中 作为 结 点 el(p 所 指 ) 的 左 (i= 0) 或 右 (i=1) 子 树 
printf(" 先 序 递归 遍历 二 叉 树 : \n"); 
PreOrderTraverse(T,visit); // 先 序 递 归 遍 历 二 叉 树 了 
printf("\n 删除 子 树 ,请 输入 待 删除 子 树 的 双亲 结 点 左 (0) 或 右 (1) 子 树 :"); 
scanf("% *c"form"%d",&el,&i); 
p= Point(T,el); // p 指 向 二 叉 树 了 中 待 删除 子 树 的 双亲 结 点 el 
DeleteChild(p,i); // 删除 p 所 指 结 点 (el1) 的 左 (i= 0) 或 右 (i=1) 子 树 
printf(" 先 序 递归 遍历 二 叉 树 : \n"); 
PreOrderTraverse(T,visit); // 先 序 递归 遍历 二 叉 树 Tf 
printf("\n 中 序 非 递归 遍历 二 叉 树 : \n"); 
InOrderTraversel(T,visit); // 中 序 非 递归 遍历 二 叉 树 了 
printf(" 中 序 非 递归 遍历 二 又 树 ( 另 一 种 方法 ) : \n"); 
InOrderTraverse2(T,visit); // 中 序 非 递归 遍历 二 又 树 T( 另 一 种 方法 ) 
DestroyBiTree(T); // 销毁 二 叉 树 T 
} 


程序 运行 结果 : (输入 中 的 表示 空格 ) 


构造 空 二 叉 树 后 , 树 空 否 ? 1(1: 是 0: 否 )。 树 的 深度 = 0。 

树 空 ,无 根 。 

请 按 先 序 输入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 于 树 的 二 叉 树 ): 
abdgiuieuuicuiE ie ( 见 图 6-11) 

建立 二 叉 树 后 , 树 空 否 ? 0(1: 是 0: 否 )。 树 的 深度 = 4。 

二 又 树 的 根 为 a。 

中 序 递归 遍历 二 又 树 : 

gdbeacf 
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后 序 递 归 遍 历 二 叉 树 : 四 
gdebfca 

请 输入 一 个 结 点 的 值 : d 忆 
结 点 的 值 为 d。 @ (©) ©, 
欲 改 变 此 结 点 的 值 , 请 输入 新 值 : mn 

层 序 遍历 二 又 树 ; ® 

abcmefg 图 6-11 运行 main6-2. cpp 生成 的 二 叉 树 
nm 的 双亲 是 b, 左 孩子 是 g, 没 有 右 孩 子 , 没 有 左 兄弟 , 右 兄弟 是 e。 

请 构造 一 个 右 子 树 为 空 的 二 叉 树 c: 

请 按 先 序 输入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 子 树 的 二 又 树 ) : 

hijl Dukwuue ( 见 图 6-12) 

中 序 递归 遍历 二 叉 树 c: 

主子 主 下 外 

树 c 插 到 树 T 了 中 ,请 输入 树 了 中 树 c 的 双亲 结 点 c 为 左 (0) 或 右 (1) 子 树 : bl 

先 序 递归 遍 历 二 叉 树 :( 见 图 6-13) 

abmghijlkecf 

删除 子 树 ,请 输入 待 删除 子 树 的 双亲 结 点 左 (0) 或 右 (1) 子 树 : h 0 

先 序 递归 遍历 二 又 树 : ( 见 图 6-14) 


图 6-12 ” 右 子 树 为 图 6-13 树 e 插 到 树 T 中 作 图 6-14 删除 h 的 左 子 
空 的 树 c 为 结 点 b 的 右 子 树 树 后 的 二 叉 树 


abmghecf 

中 序 非 递归 遍历 二 又 树 : 
gmbheacf 

中 序 非 递 归 遍 历 二 叉 树 ( 另 一 种 方法 ): 
gmbheacf 


62 遍历 二 叉 树 和 线索 二 叉 树 
遍历 二 叉 树 


遍历 二 叉 树 就 是 按 某 种 规则 ,对 二 又 树 的 每 个 结 点 均 访问 一 次 ,而 且 仅 访问 一 次 。 这 实 
就 是 将 非 线 性 的 二 又 树 结构 线性 化 。 遍历 二 又 树 的 方法 有 先 序 .中 序 、. 后 序 和 层 序 4 
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种 ,访问 的 顺序 各 不 相同 。 以 图 6-1(a) 所 示 二 又 树 为 例 , 先 序 遍历 的 顺序 为 1 2 3 4; 中 序 遍 
历 的 顺序 为 3 2 4 1; 后 序 遍历 的 顺序 为 3 4 2 1; 层 序 遍 历 的 顺序 为 1 2 3 4。 对 于 这 棵 二 又 
树 , 层 序 遍 历 和 先 序 遍 历 的 顺序 碰巧 一 致 。 有 关 二 叉 链 表 存 储 结构 生成 二 又 树 和 中 序 非 递 
归 人 遍历 二 又 树 的 算法 6. 2 一 算法 6.4 在 bo6-3. cpp 中 ,算法 6. 1 在 bo6-2. cpp 中 。 


622 线索 二 叉 树 


为 了 更 方便 .更 快捷 地 遍历 二 叉 树 ,最 好 在 二 叉 树 的 结 点 上 增加 2 个 指针 ,它们 分 别 指 
向 遍历 二 又 树 时 该 结 点 的 前 驱 和 后 继 结 点 。 这 样 , 从 二 又 树 的 任 一 结 点 都 可 以 方便 地 找到 
其 他 结 点 。 但 这 样 做 大 大 降低 了 结构 的 存储 密度 。 另 外 ,根据 二 叉 树 的 性 质 3( 教 科 书 124 
页 ), 有 : mo 二 ns 十 1。 空 链 域 =2no 十 nm (叶子 结 点 有 2 个 空 链 域 , 度 为 1 的 结 点 有 1 个 空 链 
域 )= 二 no 十 ni 十 nz 十 1 二 n 十 1。 也 就 是 说 ,在 由 n 个 结 点 组 成 的 二 又 树 中 ,有 n 十 1 个 指针 是 
空 指针 。 如 果 能 利用 这 n 十 1 个 空 指针 ,使 它们 指向 结 点 的 前 驱 ( 当 左 孩 子 指针 空 ) 或 后 继 
( 当 右 孩子 指针 空 ) , 则 既 可 不 降低 结构 的 存储 密度 ,又 可 更 方便 .更 快捷 地 遍历 二 又 树 。 不 
过 ,这 样 就 无 法 区 别 左右 孩子 指针 所 指 的 到 底 是 结 点 的 左右 孩子 ,还 是 结 点 的 前 驱 后 继 了 。 
为 了 有 所 区 别 , 另 增加 2 个 域 LTag 和 RTag。 当 所 指 的 是 孩子 ,其 值 为 0(Link); 当 所 指 的 
是 前 驱 后 继 ,其 值 为 1(Thread)。 这 样 做 ,结构 的 存储 密度 也 有 所 降低 ,但 不 大 。 因 为 LTag 
和 RTag 分 别 只 占 1 个 比特 (二 进 制 位 ) 即 可 。c6-3.h 是 二 又 树 的 二 叉 线索 存储 结构 。 它 只 
是 比 二 又 链表 存储 结构 (在 c6-2.h 中 ) 多 了 LTag 和 RTag 两 个 域 。 


// c6-3.h 二 叉 树 的 二 叉 线索 存储 结构 。 在 教科 书 第 133 页 ( 见 图 6-15) 

enum PointerTag // 枚 举 Be i 
(Link,Thread); // Link(0): 指针 ,Thread(1): 线索 | 十 =[ tehild [LTas data [RTag| renid 
struct BiThrNode 

{ TElenType data; // 结 点 的 值 人 


ep Ee eR ee ee ee 
BiThrNode * lchild, * rchild; // 左右 孩子 指针 BiThrNode BiThrNode 
PointerTag LTag:2; // 左 标志 . 占 2bit, 修 改 图 6-15 二 叉 树 的 二 叉 线索 存储 结构 


PointerTag RTag:2; // 右 标 志 , 占 2bit, 修 改 
}s 
typedef BiThrNode * BiThrTree; 


构造 线索 二 叉 树 的 方法 和 构造 以 二 又 链表 存储 的 二 叉 树 方法 相似 ,都 是 按 先 序 输入 结 
点 的 值 来 构造 二 又 树 的 。 对 比 bo6-3. cpp 中 的 CreateBiTree() 函 数 和 bo6-4. cpp 中 的 
CreateBiThrTree() 函 数 可 见 ,它们 的 区 别 有 两 点 : 

(1) 二 又 树 结 点 的 结构 不 同 ; 

(2) 构造 线索 二 又 树 时 ,车 有 左右 孩子 结 点 ,还 要 给 左右 标志 赋值 0(Link) 。 

图 6-1(a) 所 示 二 又 树 调 用 CreateBiThrTree() 函数 产生 的 二 叉 树 结构 如 图 6-16 所 示 。 
和 调用 CreateBiTree() 函数 产生 的 二 叉 树 结构 ( 见 图 6-8) 相 比 ,前 者 只 是 多 了 LTag 和 
RTag 两 个 域 。 并 且 当 其 相应 孩子 指针 不 空 时 ,赋值 0。 

调用 CreateBiThrTree() 函 数 ,只 是 构造 了 一 棵 可 以 线索 化 的 二 又 树 ,还 没有 完成 线 
索 化 。 

因为 对 于 一 棵 给 定 的 二 又 树 , 其 先 序 .中 序 、 后 序 和 层 序 遍历 的 顺序 是 不 同 的 。 显 然 , 其 
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线索 化 的 操作 和 遍历 的 操作 也 是 不 同 的 。 

图 6-17 是 图 6-1(a) 所 示 二 又 树 的 中 序 线索 二 又 树 存储 结构 示例 ,和 二 又 链表 ( 见 图 6-8) 
存储 结构 相 比 ,第 一 , 它 多 了 一 个 头 结 点 。 其 左 孩 子 指针 指向 根 结 点 , 右 孩 子 指针 (线索 ) 指 
向 中 序 遍历 所 访问 的 最 后 一 个 结 点 。 第 二 , 它 每 个 结 点 的 左右 孩子 指针 都 不 是 空 指针 。 在 
没有 孩子 的 情况 下 ,分 别 指向 该 结 点 中 序 遍 历 的 前 驱 或 后 继 。 第 三 ,中 序 遍历 的 第 1 个 结 点 
(最 左边 的 结 点 , 它 没有 左 孩子 ,本 例 是 结 点 3) 的 左 孩 子 指针 (线索 ) 和 最 后 1 个 结 点 (最 右 
边 的 结 点 , 它 没有 右 孩 子 ,本 例 是 结 点 1) 的 右 孩 子 指针 (线索 ) 都 指向 头 结 点 。 其 目的 是 标 
志 遍 历 的 起 点 和 终点 。 图 6-18 是 空 线索 二 又 树 。 


头 指针 Thrt 
| 
ofh 
头 结 点 
T | 下 
ol 
ol uy rr 
ofz2lo oo 
证 中 
Nu [3 Nu Nu lal Nur 上 由 | 1|4i 
图 6-16 ”CreateBiThrTree() 产 生 的 二 叉 树 图 6-17 中 序 线索 二 叉 树 存储 结构 
(以 图 6-1(a) 为 例 ) (以 图 6-1(a) 为 例 ) 
bo6-4. cpp 中 的 InThreading() 函 数 和 InOrderThreading() 函数 Thrt 
共同 完成 了 对 二 又 树 的 中 序 遍 历 线 索 化 。 其 算法 是 : 设置 全 局 指针 | 
变量 pre( 之 所 以 设 为 全 局 变量 ,是 因为 在 递归 函数 InThreading() ALA 
和 InOrderThreading() 中 都 要 用 到 , 设 为 全 局 变量 就 不 必 频 繁 传递 | 
变量 的 值 ) , 令 pre 总 是 指向 遍历 的 前 驱 结 点 ,p 指向 当前 结 点 ; 在 图 6-18 空 线索 二 又 树 


中 序 遍 历 过 程 中 ,如 果 p 所 指 结 点 没有 左 孩 子 , 则 结 点 的 左 孩 子 指 
针 指 向 pre 所 指 结 点 , 结 点 的 LTag 域 的 值 为 1(Thread); 如 果 pre 所 指 结 点 没有 右 孩 子 , 则 
结 点 的 右 孩 子 指针 指向 p, 结 点 的 RTag 域 的 值 为 1(Thread) 。 

对 于 图 6-17 所 示 的 中 序 线索 二 又 树 ,我 们 能 不 能 在 找到 遍历 的 第 1 个 结 点 后 , 顺 着 右 
孩子 指针 一 直 找 到 遍历 的 最 后 1 个 结 点 呢 ? 这 是 不 一 定 的 。 因 为 结 点 的 右 孩 子 指针 并 不 一 
定 指向 后 继 结 点 , 它 也 可 能 指向 右 孩 子 ,而 右 孩 子 并 不 一 定 恰好 是 后 继 结 点 。 

bo6-4. cpp 中 的 InOrderTraverse_Thr() 函 数 完成 了 对 中 序 线索 二 又 树 的 中 序 遍 历 操 
作 。 其 算法 是 : 当 树 不 空 时 ,由 树 根 向 左 找 , 一 直 找 到 没有 左 孩 子 的 结 点 (最 左 结 点 )。 这 就 
是 中 序 遍 历 的 第 1 个 结 点 。 若 该 结 点 没有 右 孩 子 , 则 右 孩 子 指针 指向 其 后 继 结 点 ; 否则 ,以 
其 右 孩 子 为 子 树 的 根 ,向 左 找 , 一 直 找 到 没有 左 孩 子 的 结 点 。 这 就 是 后 继 结 点 。 当 结 点 的 右 
孩子 指针 指向 头 结 点 ,遍历 结束 。 

图 6-19 是 图 6-1(a) 所 示 二 又 树 的 先 序 线索 二 又 树 存储 结构 示例 。 其 头 结 点 的 左 孩子 
指针 仍 指向 根 结 点 , 右 孩 子 指针 指向 先 序 遍历 所 访问 的 最 后 一 个 结 点 。bo6-4. cpp 中 的 先 
序 线索 化 的 递归 函数 PreThreading() 与 中 序 线索 化 的 递归 函数 InThreading() 很 相像 ,都 是 
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利用 递归 进行 线索 化 ,只 不 过 顺序 不 同 。 但 由 于 PreThreading() 是 先 序 线索 化 ,所 以 判断 结 点 
是 否 有 左右 孩子 就 不 能 由 其 左右 孩子 指针 是 否 为 空 决定 ,而 要 由 结 点 的 LTag 和 RTag 域 
是 否 为 0(Link) 来 决定 。 

对 于 先 序 线索 化 二 又 树 的 先 序 遍历 算法 是 这 样 的 : 根 结 点 是 遍历 的 第 1 个 结 点 ; 如 
果 结 点 有 左 孩 子 , 则 左 孩 子 是 其 后 继 ; 若 结 点 没有 左 孩 子 , 则 右 孩 子 指针 所 指 的 结 点 是 其 
后 继 ( 无 论 该 结 点 有 没有 右 孩 子 ) 。 相 关 程 序 见 bo6-4. cpp 中 的 PreOrderTraverse_Thr() 
函数 。 

bo6-4. cpp 中 的 后 序 线索 化 的 递归 函数 PostThreading() 与 中 序 线 索 化 的 递归 函数 
InThreading() 也 很 相像 ,也 是 利用 递归 进行 线索 化 ,也 只 是 顺序 不 同 。 图 6-20 是 图 6-1(a) 
所 示 二 又 树 的 后 序 线索 二 又 树 存储 结构 示例 。 其 头 结 点 的 左右 孩子 指针 都 指向 根 结 点 。 后 
序 遍 历 的 第 1 个 结 点 必定 是 叶子 结 点 , 它 的 左 孩 子 指针 指向 头 结 点 。 对 于 后 序 线索 化 二 叉 
树 的 后 序 遍 历 算法 较 复杂 。 因 为 根 结 点 是 在 最 后 遍历 ,所 以 要 采用 带 有 双亲 指针 的 三 又 链 
表 结 构 才 行 。 


头 指针 _Thrt 头 指针 _Thrt 
| 二 
| 头 结 点 头 结 点 
TE 根 结 点 T TY 根 结 点 
-| 小 -| loll 
根 指针 7 根据 针 
of2lo | oz。 
1 1|4 IT FE TI | 
图 6-19 先 序 线索 二 又 树 存 储 结 构 图 6-20 后 序 线索 二 叉 树 存储 结构 
(以 图 6-1(a) 为 例 ) (以 图 6-1(a) 为 例 ) 


// bo6-4. cpp 构造 线索 二 叉 树 的 11 个 基本 操作 ,包括 算法 6.5 一 算法 6.7 
void CreateBiThrTree(BiThrTree &T) 
{ // 按 先 序 输入 线索 二 叉 树 中 结 点 的 值 ,构造 线索 二 叉 树 T。0( 整 型 )/ 空 格 (字符 型 ) 表 示 空 结 点 
TElemType ch; 
scanf(form,&ch); // 输入 结 点 的 值 
if(ch== Nil) // 结 点 的 值 为 空 
T= NULL; 
else // 结 点 的 值 不 为 空 
{ T= (BiThrTree)malloc(sizeof(BiThrNode)); // 生成 根 结 点 ( 先 序 ) 
if(!T) 
exit(OVERFLOW) ; 
了 -data= ch; // 将 值 赋 给 T 所 指 结 点 
CreateBiThrTree(T -二 lchild); // 递归 构造 左 子 树 
if(T- 二 lchild) // 有 左 孩 子 
T->LTag = Link; // 给 左 标 志 赋值 (指针 ) 
CreateBiThrTree(T -二 rchild); // 递归 构造 右 子 树 
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if(T- 二 rchild) // 有 右 孩 子 
T->RTag = Link; // 给 右 标志 赋值 (指针 ) 


} 
BiThrTree pre; // 全 局 变量 ,始终 指向 刚刚 访问 过 的 结 点 
void InThreading(BiThrTree p) 
{ // 通过 中 序 遍 历 进行 中 序 线索 化 ,线索 化 之 后 pre 指向 最 后 一 个 结 点 。 算 法 6.7 
i£(p) // 线索 二 叉 树 不 空 
{ InThreading(p -二 lchild); // 递归 左 子 树 线索 化 
if(!p- 二 lchild) // 没有 左 孩子 
{ p->LTag= Thread; // 左 标 志 为 线索 (前 驱 ) 
p -lchild= pre; // 左 孩子 指针 指向 前 驱 
} 
if(1pre -rchild) // 前 驱 没 有 右 孩 子 
{ pre- 二 RTag = Thread; // 前 驱 的 右 标志 为 线索 (后 继 ) 
pre -rchild= p; // 前 驱 右 孩子 指针 指向 其 后 继 ( 当 前 结 点 p) 
} 
pre=p; // 保持 pre 指向 p 的 前 驱 
InThreading(p -二 rchild); // 递归 右 子 树 线索 化 


} 
void InOrderThreading(BiThrTree &Thrt ,BiThrTree T) 
{ // 中 序 遍 历 二 叉 树 了 ,并 将 其 中 序 线索 化 ,Thrt 指向 头 结 点 。 算 法 6.6 
if(1 (Thrt = (BiThrTree)malloc(sizeof(BiThrNode)))) // 生成 头 结 点 不 成 功 
exit( OVERFLOW) ; 
Thrt -LTag = Link; // 建 头 结 点 , 左 标 志 为 指针 
Thrt -二 RTag = Thread; // 右 标 志 为 线索 
Thrt -之 rchild = Thrt; // 右 孩 子 指针 回 指 
i£(1T) // 车 二 叉 树 T 空 , 则 左 孩 子 指针 回 指 
Thrt ->1child= Thrt; 
else // 二 又 树 T 非 空 
{ Thrt -之 lchild=T; // 头 结 点 的 左 孩 子 指针 指向 根 结 点 
pre = Thrt; // pre( 前 驱 ) 的 初 值 指向 头 结 点 
InThreading(T); // 中 序 遍 历 进行 中 序 线 索 化 ,pre 指向 中 序 遍历 的 最 后 一 个 结 点 
pre -rchild= Thrt; // 最 后 一 个 结 点 的 右 孩子 指针 指向 头 结 点 
pre -RTag = Thread; // 最 后 一 个 结 点 的 右 标 志 为 线索 
Thrt - 盖 rchild= pre; // 头 结 点 的 右 孩 子 指针 指向 中 序 遍历 的 最 后 一 个 结 点 
} 
} 
void InOrderTraverse Thr(BiThrTree T.void(# Visit)(TElemType)) 
{ // 中 序 遍历 线索 二 叉 树 T( 头 结 点 ) 的 非 递归 算法 。 算 法 6.5 
BiThrTree p; 
p=T->lchild; // p 指 向 根 结 点 
while(p1= T) 
{ // 空 树 或 遍历 结束 时 ,p == 了 T 
while(p -二 LTag == Link) // 由 根 结 点 一 直 找 到 二 叉 树 的 最 左 结 点 
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p=p->lchild; // p 指 向 其 左 孩子 
Visit(p -二 data); // 访问 此 结 点 
while(p -二 RTag == Thread&&p -二 rchild!=T) 
{ // p->rchild 是 线索 (后 继 ) , 且 不 是 遍历 的 最 后 一 个 结 点 
p=p->rchild; // p 指 向 其 后 继 
Visit(p -过 data); // 访问 后 继 结 点 
} 
// 若 p->rchild 不 是 线索 (是 右 孩 子 ),p 指向 右 孩 子 , 返 回 循环 , 找 这 棵 子 树 中 序 遍 历 的 第 1 个 结 点 
p=p->rchild; 


} 
void PreThreading(BiThrTree p) 
{ // PreOrderThreading() 调 用 的 递归 函数 
if(1pre -之 rchild) // p 的 前 驱 没有 右 孩 子 
{ pre- 二 RTag = Thread; // pre 的 右 孩 子 指针 为 线索 
pre -rchild= p; // p 前驱 的 后 继 指向 p 
} 
if(!p -二 lchild) // p 没 有 左 孩 子 
{ p- 二 LTag = Thread; // p 的 左 孩子 指针 为 线索 
p- 盖 lchild = pre; // p 的 左 孩 子 指针 指向 前 驱 
} 
pre= p; // 移动 前 驱 
if(p- 二 LTag == Link) // p 有 左 孩 子 
PreThreading(p -二 lchild); // 对 Pp 的 左 孩 子 递归 调用 preThreading() 
if(p -二 RTag == Link) // p 有 右 孩 子 
PreThreading(p -二 rchild); // 对 p 的 右 孩 子 递 归 调用 preThreading() 
} 
void PreOrderThreading(BiThrTree &Thrt ,BiThrTree T) 
{ // 先 序 线索 化 二 叉 树 了 , 头 结 点 的 右 孩 子 指针 指向 先 序 遍 历 的 最 后 1 个 结 点 
if(1 (Thrt = (BiThrTree)malloc(sizeof(BiThrNode)))) // 生成 头 结 点 
exit(OVERFLOW) ; 
Thrt -LTag = Link; // 头 结 点 的 左 孩 子 指针 为 孩子 
Thrt -RTag = Thread; // 头 结 点 的 右 孩 子 指针 为 线索 
Thrt ->rchild= Thrt; // 头 结 点 的 右 孩 子 指针 指向 自身 
i£(1T) // 空 树 
Thrt -之 lchild= Thrt; // 头 结 点 的 左 孩 子 指针 也 指向 自身 
else // 非 空 树 
{ Thrt ->lchild=T; // 头 结 点 的 左 孩 子 指针 指向 根 结 点 
pre= Thrt; // 前 驱 为 头 结 点 
PreThreading(T); // 从 头 结 点 开始 先 序 递归 线索 化 
pre -RTag = Thread; // 最 后 一 个 结 点 的 右 孩 子 指针 为 线索 
pre -rchild= Thrt; // 最 后 一 个 结 点 的 后 继 指 向 头 结 点 
Thrt - 盖 rchild= pre; // 头 结 点 的 后 继 指向 最 后 一 个 结 点 
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void PreOrderTraverse Thr(BiThrTree T.void(% Visit)(TElemType)) 
{ // 先 序 遍历 线索 二 叉 树 T( 头 结 点 ) 的 非 递归 算法 
BiThrTree p=T- 二 lchild; // p 指 向 根 结 点 
while(p!=T) // p 未 指向 头 结 点 (遍历 的 最 后 1 个 结 点 的 后 继 指向 头 结 点 ) 
{ Visit(p- 二 data); // 访问 根 结 点 
if(p- 二 LTag== Link) // p 有 左 孩 子 
p=p->lchild; // p 指 向 左 孩 子 (后 继 ) 
else // p 无 左 孩子 
p=P->rchild; // p 指 向 右 孩 子 或 后 继 


} 
void PostThreading(BiThrTree p) 
{ // PostOrderThreading( ) 调 用 的 递归 函数 
if(p) // p 不 空 
{ PostThreading(p -二 lchild); // 对 p 的 左 孩子 递归 调用 PostThreading() 
PostThreading(p -二 rchild); // 对 p 的 右 孩 子 递归 调用 PostThreading() 
if(1p- 之 lchild) // p 没 有 左 孩 子 
{ P-LTag = Thread; // p 的 左 孩 子 指针 为 线索 
p->lchild= pre; // p 的 左 孩子 指针 指向 前 驱 
} 
if(1pre - 记 rchild) // p 的 前 驱 没 有 右 孩 子 
{ pre -RTag = Thread; // p 前驱 的 右 孩 子 指针 为 线索 
pre -rchild=p; // p 前 驱 的 后 继 指向 p 
} 
pre=p; // 移动 前 驱 


} 
void PostOrderThreading(BiThrTree &Thrt,BiThrTree T) 
{ // 后 序 递 归 线 索 化 二 叉 树 
if(1 (Thrt = (BiThrTree)malloc(sizeof(BiThrNode)))) // 生成 头 结 点 
exit(OVERFLOW) ; 
Thrt -二 LTag = Link; // 头 结 点 的 左 孩 子 指针 为 孩子 
Thrt -二 RTag = Thread; // 头 结 点 的 右 孩 子 指针 为 线索 
if(1T) // 空 
Thrt -二 lchild = Thrt -二 rchild = Thrt; // 头 结 点 的 左右 孩子 指针 指向 自身 
else // 非 空 树 
{ Thrt -之 lchild= Thrt -rchild=T; // 头 结 点 的 左右 孩子 指针 指向 根 结 点 (最 后 一 个 结 点 ) 
pre= Thrt; // 前 驱 为 头 结 点 
PostThreading(T); // 从 头 结 点 开始 后 序 递 归 线 索 化 
if(pre -RTagl= Link) // 最 后 一 个 结 点 没有 右 孩 子 
{ pre -RTag = Thread; // 最 后 一 个 结 点 的 右 孩 子 指针 为 线索 
pre -二 rchild= Thrt; // 最 后 一 个 结 点 的 后 继 指 向 头 结 点 
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void DestroyBiTree(BiThrTree &T) 
{ // DestroyBiThrTree 调用 的 递归 函数 ,T 指 向 根 结 点 
i£(T) // 非 空 树 
{ if(T->LTag== 0) // 有 左 孩 子 
DestroyBiTree(T- 二 lchild); // 销毁 左 子 树 
if(T- 二 RTag == 0) // 有 右 孩 子 
DestroyBiTree(T -二 rchild); // 销毁 右 子 树 
free(T); // 释放 根 结 点 
T= NULL; // 空 指针 赋 0 


} 
void DestroyBiThrTree(BiThrTree &Thrt) 
{ // 初始 条 件 : 线索 二 叉 树 Thrt 存在 。 操 作 结 果 : 销毁 线索 二 又 树 Thrt 
证 (Thrt) // 头 结 点 存在 
{ 证 (Thrt -二 lchild) // 根 结 点 存在 
DestroyBiTree(Thrt -二 lchild); // 递归 销毁 头 结 点 lchild 所 指 二 叉 树 
free(Thrt); // 释放 头 结 点 
Thrt = NULL; // 线索 二 叉 树 Thrt 指针 赋 0 


// main6-3. cpp 检验 线索 二 叉 树 部 分 基本 操作 的 程序 
间 define CHAR 1 // 字符 型 。 第 2 行 
// 非 define CHAR 0 // 整 型 (二 者 选 一 ) 。 第 3 行 
间 include"func6-1.cpp" // 利用 条 件 编译 ,在 主 程序 中 选择 结 点 的 类 型 ,访问 树 结 点 的 函数 
间 include"c6-3.h" // 二 叉 树 的 二 叉 线索 存储 结构 
间 include"bo6-4.cpp”// 构造 线索 二 叉 树 的 基本 操作 
间 define FLAG 0 // 是 否 进 行 后 序 遍 历 的 标志 
void main() 
{ 
BiThrTree H,T; 
int i; 
for(i=1;i<=3;i+4+ ) // 循环 3 次 ,实现 3 种 线索 化 和 遍历 


{ 
‘ 


非 证 CHAR // CHAR 值 为 非 零 , 结 点 类 型 为 字符 

printf(" 请 按 先 序 输入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 子 树 的 二 叉 树 ): \n"); 
间 else // CHAR 值 为 零 , 结 点 类 型 为 整 型 

printf(" 请 按 先 序 输入 二 叉 树 (如 : 1 2 0 0 0 表示 1 为 根 结 点 ,2 为 左 子 树 的 二 叉 树 ) : \n"); 
间 endif 

CreateBiThrTree(T) ; // 按 先 序 产生 二 叉 树 

scanf("% x*c"); // 吃 掉 回 车 符 

switch(i) 

{ case 1:PreOrderThreading(H,T); // 在 先 序 遍历 的 过 程 中 , 先 序 线索 化 二 叉 树 

printf(" 先 序 遍 历 ( 输 出 ) 线 索 二 叉 树 : \n"); 
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PreOrderTraverse_Thr(H,visit); // 先 序 遍历 (输出 ) 线 索 二 又 树 
break; 
case 2:InOrderThreading(H,T); // 在 中 序 遍 历 的 过 程 中 .中 序 线索 化 二 又 树 
printf(" 中 序 遍历 (输出 ) 线 索 二 又 树 : \n"); 
InOrderTraverse_Thr(H,visit); // 中 序 遍 历 ( 输 出 ?线索 二 叉 树 
break; 
case 3:PostOrderThreading(H,T); // 在 后 序 遍 历 的 过 程 中 ,后 序 线索 化 二 叉 树 
间 if FLAG // 当 定义 FLAG 为 1 时 ,进行 后 序 遍 历 
printf(" 后 序 遍 历 ( 输 出 ) 线 索 二 又 树 : \n")， 
PostOrderTraverse Thr(H,visit); 
endif 
} 
printf("\n"); 
DestroyBiThrTree(H); // 销毁 线索 二 叉 树 日 


} 
程序 运行 结果 : (输入 中 的 表示 空格 ) 


请 按 先 序 输入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 子 树 的 二 又 树 ) : 
abdg ecf x ( 见 图 6-21) 

先 序 遍 历 ( 答 出) 线索 二 又 树 : ( 见 图 6-22) 

abdgecf 

请 按 先 序 输入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 子 树 的 二 叉 树 ) : 
abdg jeuucufi jy ( 见 图 6-21) 

中 序 遍 历 ( 输 出 ) 线 索 二 叉 树 :( 见 图 6-23) 

gdbeacf 

请 按 先 序 输入 二 叉 树 (如 : ab 三 个 空格 表示 a 为 根 结 点 ,b 为 左 子 树 的 二 又 树 ) : 
abdgUUUieUUcuUfLUw ( 见 图 6-21) 


图 6-21 生成 的 二 叉 树 图 6-22” 先 序 线 索 化 二 又 树 


图 6-24 是 后 序 线索 化 的 示意 图 。 由 于 没有 指向 双亲 的 指针 ,这 种 结构 还 是 无 法 仅仅 根 
据 后 序 线索 二 又 树 进行 后 序 遍 历 。 
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图 6-23 ”中 序 线索 化 二 又 树 图 6-24 后 序 线索 化 二 又 树 


63 树 和 和 森林 


二 叉 树 是 最 简单 的 树 , 还 有 多 叉 树 ,多 叉 树 统称 为 树 。 森 林 是 由 2 棵 以 上 的 树 组 成 的 。 


// c6-4.h 树 的 二 叉 链 表 ( 孩 子 -兄弟 ) 存 储 结构 。 在 教科 书 第 136 页 ( 见 图 6-25) 
typedef struct CSNode // 结 点 类 型 


CSTree CSNode 
{ TElemType data; // 结 点 的 值 了 -| firstchild | data | nextsibling 
CSNode * firstchild, * nextsibling; | 1 
}CSNode, * CsTree; [i i | 
本 CSNode CSNode 
一 棵 树 无 论 有 多 少 又 , 它 最 多 有 一 个 长 子 和 


一 个 排序 恰 在 其 下 的 兄弟 。 根 据 这 样 的 定义 , 则 ”图 25 树 的 二 叉 链表 (孩子 兄弟) 存储 结构 


每 个 结 点 的 结构 就 都 统一 到 了 二 又 链 表 结构 上 。 这 样 有 利于 对 结 点 进行 操作 。 图 6-26 是 教 
科 书 图 6. 13 所 示 的 树 的 二 叉 链表 (孩子 -兄弟 ) 存 储 结 构 。 


RINULL 
A 
NULUD NULLB NN 
® NULUEINULL 上 cnurd 
FINULL 
A ® © Pa 
NULL[G sl 
©® © D NuLUH 
、 
© © Q NuuLkNuu 
人 教科 书 图 613 所 示 的 桂 (0) 存储 结构 
图 6-26 ”采用 二 又 链表 (和 孩子- 兄弟) 存储 树 的 示例 
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// bo6-5. cpp 树 的 二 叉 链 表 ( 孩 子 -兄弟 ) 存 储 (存储 结构 由 c6-4.h 定义 ) 的 基本 操作 (16 个 ) 
间 define ClearTree DestroyTree // 二 者 操作 相同 
void InitTree(CSTree &T) 
{ // 操作 结果 : 构造 空 树 了 
T= NULL; 
} 
void DestroyTree(CSTree &T) 
{ // 初始 条 件 : 树 T 存 在 。 操 作 结果 : 销毁 树 了 
i£(T) // 非 空 树 
{ DestroyTree(T -二 firstchild); // 递归 销毁 了 T 的 长 子 为 根 结 点 的 子 树 
DestroyTree(T -二 nextsibling); // 递归 销毁 T 的 下 一 个 兄弟 为 根 结 点 的 子 树 
free(T); // 释放 根 结 点 
T= NULL; // 空 指针 赋 0 


} 
typedef CSTree QElemType; // 定义 队列 元 素 类 型 为 孩子 -兄弟 二 叉 链表 的 指针 类 型 
间 include"c3-2.h" // 定义 LinkQueue 类 型 ( 链 队列 ) 
间 include"bo3-2.cpp"”// LinkQueue 类 型 的 基本 操作 
void CreateTree(CSTree &T) 
{ // 构造 树 了 
char c[20]; // 临时 存放 孩子 结 点 ( 设 不 超过 20 个 ) 的 值 
CSTree p,pl; 
LinkQueue q; 
int i,m; 
InitQueue(q); // 初始 化 队列 q 
printf(" 请 输入 根 结 点 (字符 型 ,空格 为 空 ): "); 
scanf("% cg *c",&c[0]); // 输入 根 结 点 的 值 
if(c[0]!= Nil) // 非 空 树 
{ T= (CSTree)malloc(sizeof(CSNode)); // 建立 根 结 点 
T->data= c[0]; // 给 根 结 点 赋值 
T->nextsibling= NULL; // 根 结 点 没有 下 一 个 兄弟 
EnQueue(q,T); // 入 队 根 结 点 的 指针 
while( 1QueueEmpty(q)) // 队 不 空 
{ DeQueue(q,p); // 出 队 一 个 结 点 的 指针 
printf(" 请 按 长 幼 顺 序 输入 结 点 %c 的 所 有 孩子 : " ,pdata); 
gets(c); // 将 结 点 的 所 有 和 孩子 作为 字符 串 输入 
m= strlen(c); 
(m0) // 有 孩子 
{ pl=p->>firstchild = (CSTree)malloc(sizeof(CSNode)); // 建立 长 子 结 点 
pl1 -二 data= c[0]; // 给 长 子 结 点 赋值 
EnQueue(q,p1); // 入 队 pl 结 点 的 指针 
for(i=1;i<m;i++ ) // 对 于 除 长 子 之 外 的 其 他 孩子 
{ pl -二 nextsibling = (CSTree)malloc(sizeof(CSNode)); // 建立 下 一 个 兄弟 结 点 
pl1 = pl 一 >nextsibling; // pl 指向 下 一 个 兄弟 结 点 
p1->data=c[i]; // 给 pl 所 指 结 点 赋值 
EnQueue(q,p1); // 入 队 pl 结 点 的 指针 
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pl -nextsibling = NULL; // 最 后 一 个 结 点 没有 下 一 个 兄弟 
} 
else // 无 孩子 

p -firstchild= NULL; // 长 子 指针 为 空 


} 
else 
T=NULL; // 空 树 
} 
Status TreeEmpty(CSTree T) 
{ // 初始 条 件 : 树 了 存在 。 操 作 结 果 : 若 了 为 空 树 , 则 返回 TURE; 否则 返回 FALSE 
证 (T) // 了 不 空 
return FALSE; 
else 
return TRUE; 
} 
int TreeDepth(CSTree T) 
// 初始 条 件 : 树 了 存在 。 操 作 结 果 : 返回 了 的 深度 
CSTree p; 


int depth,max = 0; 
if(1T) // 树 空 
return 0; 
for(p=T 了 ->firstchild;p;p=p->nextsibling) // 对 于 树 了 根 结 点 的 所 有 孩子 结 点 (由 Pp 指向) 
{ // 求 子 树 深度 的 最 大 值 
depth = TreeDepth(p); // 递归 求 孩子 结 点 的 深度 depth 
证 (depth>max) // 最 大 孩子 结 点 的 深度 存 max 
max = depth; 
} 
return max + 1; // 树 的 深度 = 子 树 深度 最 大 值 + 1 
} 
TElemType Value(CSTree p) 
{ // 返回 p 所 指 结 点 的 值 
return P -二 data; 
} 
TElemType Root(CSTree T) 
{ // 初始 条 件 : 树 T 存 在 。 操 作 结果 : 返回 了 的 根 
4E(T) 
return Value(T); 
else 
return Nil; 
} 
CSTree Point(CSTree T.TElemType s) 
{ // 返回 二 叉 链表 (孩子 -兄弟 ) 树 了 中 指向 元 素 值 为 s 的 结 点 的 指针 。 新 增 
LinkQueue q; 
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QFElemType a; 
i£(T) // 非 空 树 
{ InitQueue(q); // 初始 化 队列 
EnQueue(q,T); // 根 结 点 入 队 
while( 1QueueEmpty(q)) // 队 不 空 
{ DeQueue(q,a); // 出 队 , 队 列 元 素 赋 给 a 
if(a -data == s) // 找到 元 素 值 为 s 的 结 点 
return a; // 返回 指向 其 的 指针 
证 (a- 二 firstchild) // 有 长 子 
EnQueue(q,a ->>firstchild); // 入 队长 子 
if(a -nextsibling) // 有 下 一 个 兄弟 
EnQueue(q,a -二 nextsibling); // 人 队 下 一 个 兄弟 


} 
return NULL; 
} 
Status Rssign(CSTree &T,TElemType cur e.TElemType value) 


{ // 初始 条 件 : 树 T 存 在 ,cur_e 是 树 T 中 结 点 的 值 。 操 作 结 果 : 改 cur_e 为 value 
CSTree p; 


if£(T) // 非 空 树 

{ p=Point(T,cur_e); // p 为 cur_e 的 指针 
if(p) // 找到 cur_e 
{ p- 二 data = value; // 赋 新 值 


return OK; 


} 
return ERROR; // 树 空 或 未 找到 
} 
TElemType Parent(CSTree T,.TElemTYPe cur_e) 
{ // 初始 条 件 : 树 T 存 在 ,cur e 是 T 中 某 个 结 点 
// 操作 结果 : 若 cur_e 是 了 的 非 根 结 点 , 则 返回 它 的 双亲 ; 否则 函数 值 为 * 空 ” 
CSTree p,t; 
LinkQueue q; 
InitQueue(q); // 初始 化 队列 q 
iE(T) // 树 非 空 
{ 证 (Value(T) == cur_e) // 根 结 点 值 为 cur_e 
return Nil; 
EnQueue(q,T); // 根 结 点 入 队 
while( 1QueueEmpty(q)) // 队列 不 空 
{ DeQueue(q,p); // 出 队 元 素 ( 指 针 ) 赋 给 p 
if(p 一 firstchild) // p 有 长 子 
{ if(p->firstchild->data== cur_e) // 长 子 为 cur_e 
return Value(p); // 返回 双亲 的 值 
t=p; // 双亲 指针 赋 给 二 
p=p- 记 firstchild; // p 指向 长 子 
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EnQueue(q,p); // 人 队长 子 
while(p -一 nextsibling) // 有 下 一 个 兄弟 
{ p=P->nextsibling; // p 指 向 下 一 个 兄弟 
if(Value(p) == cur_e) // 下 一 个 兄弟 为 cur_e 
return Value(t); // 返回 双亲 的 值 
EnQueue(q,p); // 入 队 下 一 个 兄弟 
} 


} 
return Nil; // 树 空 或 未 找到 cur_e 
} 
TElemType LeftChild(CSTree T,TElemType cur_e) 
{ // 初始 条 件 : 树 T 存 在 ,cur e 是 了 中 某 个 结 点 
// 操作 结果 : 若 cur_e 是 T 的 非 叶子 结 点 , 则 返回 它 的 最 左 孩子 ; 否则 返回 “ 空 ” 
CSTree f; 
f= Point(T,cur_e); // 工 指向 结 点 cur_e 
if(f&&f -firstchild) // 找到 结 点 cur_e 且 结 点 cur_e 有 长 子 


return f ->firstchild -data; // 返回 结 点 cur_e 的 长 子 的 值 
else 


return Nil; // 返回 空 
} 
TElemType RightSibling(CSTree T,TElemType cur_e) 
{ // 初始 条 件 : 树 T 存 在 ,cur_e 是 T 中 某 个 结 点 
// 操作 结果 : 若 cur_e 有 右 兄 弟 , 则 返回 它 的 右 兄 弟 ; 否则 返回 “ 空 
CSTree f; 
f= Point(T,cur_e); // 工 指向 结 点 cur_e 
证 (f&&f ->nextsibling) // 找到 结 点 cur_e 且 结 点 cur_e 有 右 兄 弟 


return f -nextsibling -二 data; // 返回 结 点 cur_e 的 右 兄弟 的 值 
else 
return Nil; // 返回 空 


1 
} 


Status InsertChild(CSTree &T,CSTree p,int i,CSTree c) 
{ // 初始 条 件 : 树 T 存 在,p 指 向 了 中 某 个 结 点 ,1<i<p 所 指 结 点 的 度 +1, 非 空 树 c 与 了 不 相交 
// 操作 结果 : 插入 c 为 了 中 p 结 点 的 第 并 棵 子 树 。 因 为 p 所 指 结 点 的 地 址 不 会 改变 ， 
// 故 p 不 需要 是 引用 类 型 
int jj 
CSTree q; 
证 (T) // 了 不 空 
{ if(i==1) // 插入 c 为 p 的 长 子 
{ c->>nextsibling=p->firstchild; // p 的 原 长 子 现 是 c 的 下 一 个 兄弟 (c 本 无 兄弟 ) 
p -firstchild=c; // p 的 长 子 指针 指向 c(Cc 成 为 的 长 子 ) 


1 
b 


else // c 不 是 p 的 长 子 
{ q=p->firstchild; // q 指 向 p 的 长 子 结 点 
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j=2; 
while(q&&j 一 i) // 找 c 的 插入 点 ,并 由 q 指 向 
{ q=q->nextsibling; // q 指 向 下 一 个 兄弟 结 点 
j++; // 计数 +1 
} 
i£(j == i) // 找到 插入 位 置 
{ c- 二 nextsibling= q-nextsibling; // c 的 下 一 个 兄弟 指向 p 的 原 第 i 个 孩子 
q-nextsibling=c; // 在 p 中 插入 c 作 为 p 的 第 i 个 孩子 
} 
else // Pp 原 有 护 子 数 小 于 i 一 1 
return ERROR; 
} 
return OK; 
} 
else // 了 空 
return ERROR; 
} 
Status DeleteChild(CSTree &T,CSTree p,int i) 
{ // 初始 条 件 : 树 了 存在 ,p 指 向 了 中 某 个 结 点 ,1 二 i<p 所 指 结 点 的 度 
// 操作 结果 : 删除 了 中 p 所 指 结 点 的 第 i 棵 子 树 。 
J 因为 所 指 结 点 的 地 址 不 会 改变 , 故 p 不 需要 是 引用 类 型 
CSTree b,q; 
int j; 
if(T) // T 不 空 
{ if(i==1) // 删除 长 子 
{ // 把 长 子 结 点 子 树 从 p 中 分 离 出 来 
b=p-firstchild; // b 指 向 p 的 长 子 结 点 
p- 盖 firstchild = b- 二 nextsibling; // p 的 原 次 子 现 是 长 子 
b -nextsibling = NULL; // p 的 长 子 结 点 成 为 待 删除 子 树 的 根 结 点 ,其 下 一 个 兄弟 指针 为 空 
DestroyTree(b); // 销毁 由 指向 的 p 的 长 子 结 点 子 树 
} 
else // 删除 非 长 子 
{ q=p->firstchild; // q 指 向 p 的 长 子 结 点 
j=2; 
while(q&g&j 一 i) // 找 第 二 棵 子 树 
{ q=q->nextsibling; // q 指 向 下 一 个 兄弟 结 点 
j++ // 计数 +1 
} 
i£(j == i) // 找到 第 二 棵 子 树 
{ b=q->nextsibling; // b 指 向 待 删除 子 树 
q- 二 nextsibling = b- 二 nextsibling; // 从 树 p 中 删除 这 棵 子 树 
b->nextsibling= NULL; // 待 删除 子 树 的 根 结 点 的 下 一 个 兄弟 指针 为 空 
DestroyTree(b); // 销毁 由 指向 的 p 的 长 子 结 点 子 树 
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else // p 原 有 孩子 数 小 于 工 
return ERROR; 
} 
return OK; 
b 
else 
return ERROR; 
} 
void PostOrderTraverse(CSTree T,void(# Visit)(TElemType)) 
{ // 后 根 遍 历 孩子 -兄弟 二 叉 链 表 结 构 的 树 了 
CSTree p; 
if(T) 
{ if(T- 二 firstchild) // 有 长 子 
{ PostOrderTraverse(T -二 firstchild,Visit); // 后 根 遍 历 长 子 子 树 
p=T->>firstchild ->nextsibling; // p 指 向 长 子 的 下 一 个 兄弟 
while(p) // 还 有 下 一 个 兄弟 
{ PostOrderTraverse(p,Visit); // 后 根 遍 历 下 一 个 兄弟 子 树 
pP=P- 盖 nextsibling; // p 指 向 再 下 一 个 兄弟 


} 
Visit(Value(T)); // 最 后 访问 根 结 点 


} 
void LevelOrderTraverse(CSTree T,void(# Visit)(TElemType)) 
{ // 层 序 遍 历 孩子 -兄弟 二 又 链 表 结 构 的 树 了 
CSTree p; 
LinkQueue q; 
InitQueue(q); // 初始 化 队列 q 
f(T) // 树 非 空 
{ Visit(Value(T)); // 先 访 问 根 结 点 
EnQueue(q,T); // 入 队 根 结 点 的 指针 
while( 1QueueEmpty(q)) // 队 不 空 
{ DeQueue(q,p); // 出 队 一 个 结 点 的 指针 
庄 (p -二 firstchild) // 有 长 子 
{ p=p-firstchild; // p 指 向 长 子 结 点 
Visit(Value(p)); // 访问 长 子 结 点 
EnQueue(q,p); // 人 队长 子 结 点 的 指针 
while(p -二 nextsibling) // 有 下 一 个 兄弟 
{ p=p->nextsibling; // p 指 向 下 一 个 兄弟 结 点 
Visit(Value(p)); // 访问 下 一 个 兄弟 
EnQueue(q,p); // 入 队 兄 弟 结 点 的 指针 
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printf("\n"); 


// bo6-6. cpp main6-4.cpp 和 algo7-3. cpp 调用 
void PreOrderTraverse(CSTree T.void(% Visit)(TElemType)) 
{ // 先 根 遍历 孩子 -兄弟 二 叉 链 表 结 构 的 树 了 
i£(T) 
{ Visit(T->data); // 先 访问 根 结 点 
PreO0rderTraverse(T -二 firstchild,Visit);， // 再 先 根 遍 历 长 子 子 树 
PreOrderTraverse(T -二 nextsibling,Visit); // 最 后 先 根 遍历 下 一 个 兄弟 子 树 


// main6-4. cpp 检验 bo6-5. cpp 和 bo6-6. cpp 的 程序 
间 define CHAR 1 // 只 可 是 字符 型 
间 include"func6-1.cpp" // 利用 条 件 编译 ,在 主 程序 中 选择 结 点 的 类 型 ,访问 树 结 点 的 函数 
间 include"c6-4.h"”// 树 的 二 又 链表 (孩子 -兄弟 ) 存 储 结构 
间 include"bo6-5.cpp" // 树 的 二 叉 链表 (孩子 -兄弟 ) 基 本 操作 
include"bo6-6. cpp" // 包括 PreOrderTraverse() 
void main() 
{ 
int i; 
CSTree T,p,q; 
TElemType e,el; 
InitTree(T); // 构造 空 树 了 
printf(" 构 造 空 树 后 , 树 空 否 ?%d(1: 是 0: 否 )。 树 根 为 %c, 树 的 深度 为 %d。\n"， 
TreeEmpty(T) ,Root(T) ,TreeDepth(T) ); 
CreateTree(T); // 按 层 序 构造 树 了 T 
printf(" 构 造 树 T 后 , 树 空 否 ?%d(1: 是 0: 否 )。 树 根 为 %c, 树 的 深度 为 sd。\n"， 
TreeEmpty(T) ,Root(T) ,TreeDepth(T)); 
printf(" 层 序 遍 历 树 T: \n"); 
LevelOrderTraverse(T,visit); // 层 序 遍历 树 了 T 
printf(" 请 输入 待 修改 的 结 点 的 值 新 值 : "); 
scanf("%c% x*c%c%*c",&e,gel); 
Assign(T,e,el); // 将 树 T 中 结 点 值 为 e 的 修改 为 el 
printf(" 层 序 遍 历 修改 后 的 树 T: \n"); 
LevelOrderTraverse(T,visit); // 层 序 遍 历 树 了 
printf("%c 的 双亲 是 %c, 长 子 是 sc, 下 一 个 兄弟 是 sc。\n" ,el,Parent(T,el) 
LeftChild(T,el) .RightSibling(CT.el)); 
printf(" 建 立 树 p: \n"); 
CreateTree(p); // 按 层 序 构造 树 p 
printf(" 层 序 遍 历 树 p: \n"); 
LevelOrderTraverse(p,visit); // 层 序 遍历 树 p 
printf(" 将 树 p 插 到 树 了 中 ,请 输入 T 中 op 的 双亲 结 点 子 树 序号 : "); 
scanf("%c%d% *c",&e.&i); 
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q= Point(T,e); // 将 指向 树 T 中 结 点 e 的 指针 赋 给 q 


InsertChild(T,q,i,p); // 将 树 p 插 入 树 T 中 作为 ga 所 指 结 点 的 第 并 棵 子 树 


printf(" 层 序 遍 历 修改 后 的 树 T: \n"); 
Level0rderTraverse(T,visit); // 层 序 遍历 树 T 
printf(" 先 根 遍历 树 T: \n"); 
PreOrderTraverse(T,visit); // 先 根 遍历 树 了 
printf("\n 后 根 遍 历 树 T: \n"); 
PostOrderTraverse(T,visit); // 后 根 遍 历 树 了 
printf("\n 删除 树 了 中 结 点 e 的 第 让 棵 子 树 ,请 输入 e i: ")， 
scanf("%c%d",&e,&i); 
q= Point(T,e); // 将 指向 树 T 了 中 结 点 @ 的 指针 赋 给 q 
DeleteChild(T,q,i); // 删除 树 了 中 所 指 结 点 的 第 并 棵 子 树 
printf(" 层 序 遍 历 修改 后 的 树 T: \n"); 
Level0rderTraverse(T,visit); // 层 序 遍历 树 T 
DestroyTree(T); // 销毁 树 了 T 

} 


程序 运行 结果 : 


构造 空 树 后 , 树 空 否 ? 1(1: 是 0: 否 )。 树 根 为 , 树 的 深度 为 0。 
请 输入 根 结 点 (字符 型 ,空格 为 空 ): RA 

请 按 长 幼 顺序 输入 结 点 R 的 所 有 孩子 : ABCL 

请 按 长 幼 顺序 输入 结 点 A 的 所 有 孩子: DE 

请 按 长 幼 顺序 输入 结 点 B 的 所 有 孩子 : 这 

请 按 长 幼 顺序 输入 结 点 C 的 所 有 孩子 : Fy 六 

请 按 长 幼 顺序 输入 结 点 D 的 所 有 孩子 : 
请 按 长 幼 顺序 输入 结 点 王 的 所 有 孩子 : 
请 按 长 幼 顺序 输入 结 点 下 的 所 有 孩子 : 
请 按 长 幼 顺 序 输入 结 点 G 的 所 有 孩子 : x 
请 按 长 幼 顺序 输入 结 点 的 所 有 孩子 : 必 
请 按 长 幼 顺 序 输入 结 点 K 的 所 有 孩子: 这 
构造 树 T 后 , 树 空 否 ? 0(1: 是 0: 否 )。 树 
层 序 遍历 树 T: ( 见 图 6-26(a)) 
RABCDEFGHK 

请 输入 待 修改 的 结 点 的 值 新 值 : D d x 
层 序 遍 历 修改 后 的 树 T: 
RABCdEFGHK 

d 的 双亲 是 A, 长 子 是 ,下 一 个 兄弟 是 E。 
建立 树 p: 

请 输入 根 结 点 (字符 型 ,空格 为 空 ): f 
请 按 长 幼 顺序 输入 结 点 王 的 所 有 孩子 : ghk x 
请 按 长 幼 顺序 输入 结 点 g 的 所 有 和 孩子 : 
请 按 长 幼 顺序 输入 结 点 h 的 所 有 和 孩子 : 
请 按 长 幼 顺序 输入 结 点 上 的 所 有 孩子 : 
层 序 遍历 树 p: ( 见 图 6-27) 

fghk 


根 为 R, 树 的 深度 为 4。 


IIS 


© QW 


图 6-27 树 p 图 示 
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将 树 p 插 到 树 T 中 ,请 输入 T 中 p 的 双亲 结 点 子 树 序号 : R3 
层 序 遍历 修改 后 的 树 T: ( 见 图 6-28) 

RABfCdEghkFGHK 

先 根 遍历 树 了: 

RAdEBfghkCFGHK 

后 根 遍 历 树 T: 

dEABghkfGHKFCR 

删除 树 了 中 结 点 e 的 第 i 棵 子 树 ,请 输入 ei: C1 ( 见 图 6-29) 
层 序 遍历 修改 后 的 树 T: 

RABfCdEghk 


(R) 
A ® 人 (O 
YW BBE WW WW 
图 6-28 树 p 插 到 树 工 后 的 状况 图 6-29 删除 树 T 中 结 点 C 的 
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64 赫 夫 曼 树 及 其 应 用 


64.1 最 优 二 叉 树 ( 赫 夫 曼 树 ) 


最 优 二 又 树 是 带 权 路 径 长 度 最 短 的 二 又 树 。 根 据 结 点 的 个 数 、 权 值 的 不 同 , 最 优 二 又 树 
的 形状 也 各 不 相同 。 图 6-30 是 3 棵 最 优 二 叉 树 的 例子 。 它 们 的 共同 特点 是 : 带 权 值 的 结 点 
都 是 叶子 结 点 。 权 值 越 小 的 结 点 ,其 到 根 结 点 的 路 径 越 长 。 构 造 最 优 二 又 树 的 方法 如 下 : 

(1) 将 每 个 带 有 权 值 的 结 点 作为 一 棵 仅 有 根 结 点 的 二 又 树 , 树 的 权 值 为 结 点 的 权 值 ; 

(2) 将 其 中 两 棵 权 值 最 小 的 树 组 成 一 棵 新 二 又 树 ,新 树 的 权 值 为 两 棵 树 的 权 值 之 和 ; 


2 
9 ® 
© OO © 
人 最 优 二 又 树 (b) 权 值 差别 大 的 结 点 (e) 权 值 相同 的 结 点 构 
构成 的 最 优 二 叉 树 成 的 最 优 二 叉 树 


图 6-30 3 棵 形状 不 同 的 最 优 二 叉 树 
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(3) 重复 (2) ,直到 所 有 结 点 都 在 一 棵 二 又 树 上 ,这 棵 二 又 树 就 是 最 优 二 又 树 。 

最 优 二 又 树 的 左右 子 树 是 可 以 互 换 的 ,因为 这 不 影响 树 的 带 权 路 径 长 度 。 当 结 点 的 权 
值 差别 大 到 一 定 程度 ,最 优 二 又 树 就 形成 了 如 图 6-30(b) 所 示 的 “一 边 倒 ? 的 形状 。 当 所 有 
结 点 的 权 值 一 样 ,或 其 权 值 差别 很 小 ,最 优 二 又 树 就 形成 了 如 图 6-30(c) 所 示 的 完全 二 叉 树 
的 形状 。 叶 子 结 点 的 路 径 长 度 近似 相等 。 

最 优 二 又 树 除了 叶子 结 点 就 是 度 为 2 的 结 点 ,没有 度 为 1 的 结 点 。 这 样 才 使 得 树 的 带 
权 路 径 长 度 最 短 。 根 据 二 叉 树 的 性 质 3, 最 优 二 又 树 的 结 点 数 为 叶子 数 的 2 倍 减 1。 


642 赫 夫 曼 编 码 


// c6-5.h 赫 夫 曼 树 和 赫 夫 曼 编 码 的 存储 结构 ( 见 图 6-31) 
typedef struct // 结 点 的 结构 ,在 教科 书 第 147 页 


int weight; // 结 点 的 权 什 HuffmanTree HTNode 
| es i es 机 =| weight parent | lchild | rchild 
UnSdl 1nt Parent, 上 cpl *ITChail. ; 
}HTNode, * HuffmanTree; // 动态 分 配 数组 存储 HuftmanGode -ha 
// 赫 夫 曼 树 于 ES 
typedef char *x HuffmanCode; // 动态 分 配 数组 存 图 6-31 赫 夫 曼 树 和 赫 夫 曼 编码 的 存储 结构 
// 储 赫 夫 曼 编码 表 


c6-5.h 定义 的 二 又 树 结构 可 以 称 为 "静态 三 又 链表 二 又 树 结 构 ”。 是 在 前 面 没有 讨论 过 
的 ,但 它 特别 适合 建立 赫 夫 曼 树 。 赫 夫 曼 树 是 由 多 棵 二 又 树 ( 森 林 ) 组 合成 而 的 一 棵 树 。 这 种 
二 又 树 结构 既 适 合 表示 树 ,也 适合 表示 森林 。 赫 夫 曼 树 结 点 的 结构 包括 权 值 .双亲 及 左右 孩 
子 静 态 指 针 , 双 亲 值 为 0 的 是 根 结 点 ,左右 孩子 值 均 为 0 的 是 叶子 结 点 。 这 种 二 又 树 结构 是 
动态 生成 的 顺序 结构 。 当 叶子 结 点 数 确定 , 赫 夫 曼 树 的 结 点 数 也 就 确定 了 。 由 图 6-32(d) 
可 见 ,建成 的 赫 夫 曼 树 除 0 号 结 点 空间 不 用 外 ,每 个 结 点 空间 都 未 空置 。 


// func6-2. cpp 程序 algo6-1. cpp 和 algo6-2. cpp 要 调用 的 2 个 函数 
间 define Order // 定义 Order。 第 2 行 
int min(HuffmanTree t,int i) 
{ // 返回 赫 夫 曼 树 t 的 前 二 个 结 点 中 权 值 最 小 的 树 的 根 结 点 序号 ,函数 select() 调 用 
int j,m; 
unsigned int k= UINT_MAX; // k 存 最 小 权 值 , 初 值 取 为 不 小 于 可 能 的 值 (无 符号 整 型 最 大 值 ) 
for(j=1;j 达 =i;j++) // 对 于 前 二 个 结 点 
if(t[j]. weight<k&&t[j].parent == 0) // t[ 订 的 权 值 小 于 k, 又 是 树 的 根 结 点 
{ Kk=t[j].weight; // t[ 让 的 权 值 赋 给 k 
m=j; // 序号 赋 给 nm 
} 
t[mj.parent = 1; // 给 选中 的 根 结 点 的 双亲 赋 非 零 值 ,避免 第 2 次 查找 该 结 点 
return m; // 返回 权 值 最 小 的 根 结 点 的 序号 
} 
void select(HuffmanTree t.int i,int &s1.int &s2) 
{ // 在 赫 夫 曼 树 t 的 前 二 个 结 点 中 选择 2 个 权 值 最 小 的 树 的 根 结 点 序号 ,sl 为 其 中 序号 ( 权 值 ) 较 小 的 
间 ifdef Order // 如 果 在 主 程 中 定义 了 Order. 则 以 下 语句 起 作用 


int j; 

间 endif 
sl1=min(t,i); // 权 值 最 小 的 根 结 点 序号 
s2 =min(t,i); // 权 值 第 2 小 的 根 结 点 序号 


间 ifdef Order // 如 果 在 主 程 中 定义 了 Order, 则 执行 下 面 一 段 程序 


if(sl 祈 s2) // sl 的 序号 大 于 s2 的 
{ // 交换 
J= sl; 
s1= s2; // sl 是 权 值 最 小 的 2 个 中 序号 较 小 的 
s2= j; // s2 是 权 值 最 小 的 2 个 中 序号 较 小 的 
} 
间 endif 
} 


// func6-3. cpp 算法 6.12 的 前 半 部 分 
int m,i,sl,s2; 
unsigned c; 
HuffmanTree p; 
char * cd; 
if(n<=1) // 叶子 结 点 数 不 大 于 n 
return; 


m=2xn-1; //n 个 叶子 结 点 的 赫 夫 曼 树 共 有 nm 个 结 点 


HT= (HuffmanTree)malloc( (m+ 1) * sizeof(HTNode)); // 0 号 单元 未 用 
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for(p=HT+1,i=1;ii<=ni+ti'+tp,+tw) // 从 1 号 单元 开始 到 nn 号 单元 ,给 叶子 结 点 赋值 


{ // Pp 的 初 值 指 向 1 号 单元 
(x p).weight =xw; // 赋 权 值 
(x* p).parent = 0; // 双亲 域 为 空 (是 根 结 点 ) 


(xp).1lchild= 0; // 左右 孩子 为 空 (是 叶子 结 点 , 即 单 结 点 树 ) 


(x*p).rchild= 0; 
} 
for(;i<=m;tti,ttp) // i 从 n+1 到 nm 
(x*p).parent = 0; // 其 余 结 点 的 双亲 域 初 值 为 0 
for(i=n+1;i 二 = m;++i) // 建 赫 夫 曼 树 


{ // 在 开 [1~i-1] 中 选择 parent 为 0 且 weight 最 小 的 两 个 结 点 ,其 序号 分 别 为 sl 和 s2 


Select(HT,i 一 1,sl,s2); 


HT[s1]. parent = HT[s2].parent = i; // i 号 单元 是 sl 和 s2 的 双亲 
HT[i].1lchild= sl; // i 号 单元 的 左右 孩子 分 别 是 sl 和 s2 


HT[i]. rchild= s2; 


HT[i]. weight = HT[ sl1]. weight + HT[ s2]. weight; // 号 单元 的 权 值 是 sl 和 s2 的 权 值 之 和 


// func6-4. cpp 求 赫 夫 曼 编 码 的 主 函数 


void main() 


{ 
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HuffmanTree HT; 
HuffmanCode HC; 
int 关 Wynyis 
printf(" 请 输入 权 值 的 个 数 ( 二 1): "); 
scanf("%d",&n); 
w= (int * )malloc(nx sizeof(int)); // 动态 生成 存放 n 个 权 值 的 空间 
printf(" 请 依次 输入 %d 个 权 值 ( 整 型 ) : \n" ,n); 
for(i=0;i< 一 =n 一 1;i++ ) 
scanf("%d" ,w+i); // 依次 输入 权 值 
HuffmanCoding(HT,HC,w,n); // 根据 w 所 存 的 nn 个 权 值 构 造 赫 夫 曼 树 HT,n 个 赫 夫 曼 编码 存 于 HC 
for(i=1;i<=n;i++) 


puts(HC[i]); // 依次 输出 赫 夫 曼 编 码 


// algo6-1. cpp 求 赫 夫 曙 编码。 实现 算法 6.12 的 程序 
间 include"cl1.h" 
间 include"c6-5.h" // 赫 夫 曼 树 和 赫 夫 曼 编 码 的 存储 结构 
间 include"func6-2. cpp" // algo6-1.cpp 和 algo6-2. cpp 要 调用 的 2 个 函数 
void HuffmanCoding( HuffmanTree &HT,HuffmanCode &HC,int * w'int n) // 算法 6.12 
{ // ww 存放 mn 个 字符 的 权 值 ( 均 二 0) ,构造 赫 夫 曼 树 名 ,并 求 出 n 个 字符 的 赫 夫 曼 编 码 HC 
int start; 
unsigned f; 
间 include"func6-3.cpp" // 算法 6.12 的 前 半 部 分 ,以 下 是 从 叶子 到 根 逆向 求 每 个 字符 的 赫 夫 曼 编码 
HC= (HuffmanCode)malloc((n+1) * sizeof(char * )); 
// 分 配 n 个 字符 编码 的 头 指针 向 量 (L0J 不 用 ) 
cd= (char * )malloc(nx sizeof(char)); // 分 配 求 编码 的 工作 空间 
cd[n-1] = \0'; // 编码 结束 符 
for(i=1;i<~=n;i++) 
{ // 逐个 字符 求 赫 夫 曼 编码 
start =n-1; // 编码 结束 符 位 置 
for(c= i,f= HT[ 订 .parent;f!=0;c=f,f=HT[E].parent) // 从 叶子 到 根 逆向 求 编码 
让 (HTLf].lchild== c) // c 是 其 双亲 的 左 孩 子 
cd[ -~-start] = '0'; // 由 叶子 向 根 赋值 '0' 
else // c 是 其 双亲 的 右 孩 子 
cd[ 一 start] = '1'; // 由 叶子 向 根 赋值 '1 
HC[i] = (char * )malloc((n- start) x sizeof(char)); // 为 第 并 个 字符 编码 分 配 空间 
strcpy(HC[i],&cd[start]); // 从 cd 复制 编码 ( 串 ) 到 HC 
} 
free(cd); // 释放 工作 空间 
} 
间 include"func6-4.cpp" // 主 函 数 


程序 运行 结果 (以 教科 书 图 6. 24 为 例 ,如 图 6-32 所 示 ): 
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请 输入 权 值 的 个 数 (1): 4 
请 依次 输入 4 个 权 值 ( 整 型 ) : 
7524 

0 

10 

110 

4 


图 6-32 是 运行 过 程 的 图 解 。 初 始 状态 下 ( 见 图 6-32(b)), 权 值 分 别 为 7.5、2、4 的 4 个 
结 点 是 4 棵 独立 的 树 ( 根 结 点 )。 它 们 没有 双亲 ,也 没有 左右 孩子 。 反 复查 找 权 值 最 小 的 两 
棵 树 ,并 把 它们 合并 成 一 棵 树 ,其 权 值 为 两 树 的 权 值 之 和 。 最 后 ,所 有 结 点 合并 成 一 棵 赫 夫 
曼 树 ( 见 图 6-32(d) ) 。 


Ww 
吕 DOOO 
(a) 生成 的 w 数 组 (b) 生成 的 HT 数组 赋 初 值 后 的 状态 (ce) 状态 (b) 所 对 应 的 结 点 状况 
HC 
Q | | 
| 十 
5 | 6 0 | 0 ; © 0 
ra 0 | 0 ， 十 =~L0 
+415 |o lo lm () (2 ‘rs 
6 | 6 3 | 4 , 本 二 | 
1 | 7 2 | 5 |: © 由 四 | | 
18 | 0 1 | 6 |[2n-1] 
(d) HT 数组 建 赫 夫 曼 树 后 的 状态 (e) 状态 (d) 所 对 应 的 结 点 状况 (f) HC 数 组 元 素 是 赫 
夫 昌 编 码 的 指针 


图 6-32 algo6-1. cpp 运行 过 程 的 图 解 


分 析 教 科 书 中 图 6. 26 及 图 6. 27 可 见 ,在 找到 两 个 权 值 最 小 的 树 的 根 结 点 后 ,合并 成 一 
棵 树 时 ,是 将 序号 小 的 结 点 作为 左 子 树 ,序号 大 的 结 点 作为 右 子 树 的 。 为 了 和 教科 书 中 的 结 
果 一 致 ,在 select() 函 数 ( 在 func6-2. cpp 中 ) 中 ,增加 了 需要 时 交换 序号 的 程序 段 。 其 实 这 
是 不 必要 的 。 在 含 光盘 的 教科 书 中 有 关 赫 夫 曼 树 的 课件 又 是 将 权 值 小 的 结 点 作为 左 子 树 ， 
权 值 大 的 结 点 作为 右 子 树 的 。 这 样 做 从 算法 实现 上 是 更 简单 易 行 的 。 为 了 在 同一 个 程序 中 
能 够 演示 这 两 种 情况 ,在 func6-2. cpp 中 增加 了 条 件 编 译 。 删 除 func6-2. cpp 中 的 第 2 行 ， 
则 运行 结果 与 光盘 的 课件 一 致 ; 否则 运行 结果 与 教科 书 中 图 6. 26 及 图 6. 27 一 致 。 这 两 种 
方法 的 赫 夫 曼 编码 的 形式 虽然 不 同 。 但 每 个 权 值 的 码 长 相同 ,都 是 赫 夫 曼 编码 。 

algo6-2. cpp 与 algo6-1. cpp 仅 是 函数 HuffmanCoding() 的 后 半 部 分 不 同 ,也 就 是 在 建 
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立 好 赫 夫 曼 树 后 求 赫 夫 曼 编码 的 方法 不 同 。algo6-1. cpp( 算 法 6. 12) 是 依次 从 叶子 结 点 ( 左 
右 孩 子 均 为 0 的 结 点 ,也 就 是 序号 在 1~n 之 间 的 结 点 ) 开 始 , 根 据 其 双亲 结 点 的 序号 ,逐步 
找到 根 结 点 的 。 这 种 方法 最 先 求 得 的 是 最 后 一 位 编码 (叶子 结 点 的 编码 ) ,最 后 求 得 第 1 位 
编码 。 而 algo6-2. cpp( 算 法 6. 13) 求 赫 夫 曼 编码 的 方法 是 由 根 结 点 起 ,依次 查找 其 左右 孩 
子 , 直 到 找到 叶子 结 点 。 它 最 先 求 得 的 是 第 1 位 编码 。 它 是 按照 赫 夫 曼 树 的 结构 ,从 左 到 右 
依次 求 得 每 个 叶子 结 点 的 赫 夫 曼 编码 的 。 在 完成 了 一 个 叶子 结 点 的 编码 , 求 下 一 个 叶子 结 
点 的 编码 时 ,不 用 再 从 根 结 点 开始 ,只 是 回溯 到 这 两 个 叶子 结 点 的 “分 又 处 ”, 继 续 求 编码 即 
可 。 两 个 叶子 结 点 在 “分 又 处 "之 前 的 编码 是 一 样 的 。 为 了 能 够 回溯 到 正确 的 位 置 ,需要 对 
每 个 结 点 标注 其 左右 分 支 是 否 已 被 编码 。 由 于 建立 好 赫 夫 曼 树 后 ,weight 域 不 再 起 作用 ， 
故 可 用 其 做 标注 。 


// algo6-2. cpp 实现 算法 6.13 的 程序 
间 include"c1. bh" 
间 include"c6-5.h" // 赫 夫 曼 树 和 赫 夫 曼 编 码 的 存储 结构 
间 include"func6-2. cpp" // algo6-1.cpp 和 algo6-2.cpp 要 调用 的 2 个 隐 数 
void HuffmanCoding(HuffmanTree &HT,HuffmanCode &HC ,int #*w,int n) 
// 前 半 部 分 为 算法 6.12 的 前 半 部 分 
{ // ww 存放 mn 个 字符 的 权 值 ( 均 过 0) ,构造 赫 夫 曼 树 HT ,并 求 出 n 个 字符 的 赫 夫 曼 编 码 HC 
unsigned cdlen; 
间 include"func6-3.cpp" // 算法 6.12 的 前 半 部 分 
// 以 下 为 算法 6.13, 无 栈 非 递归 遍历 赫 夫 曼 树 , 求 赫 夫 曼 编 码 
HC= (HuffmanCode)malloc((n+1) * sizeof(char * )); 
// 分 配 n 个 字符 编码 的 头 指 针 向 量 ([0] 不 用 ) 
cd = (char * )malloc(n x sizeof(char)); // 分 配 求 编码 的 工作 空间 
c=m; // m=2Xxn-1, 从 最 后 一 个 结 点 ( 根 ) 开 始 
cdlen = 0; // 码 长 的 初 值 为 0 
for(i=1;i<=m;++ti) 
HT[i].weight = 0; // 求 编码 不 再 需要 权 值 域 ,改作 结 点 状态 标志 ,0 表示 其 左右 孩子 都 不 曾 被 访问 
while(c) // 未 到 叶子 结 点 的 孩子 域 
{ i£(HT[cj.weight == 0) // 左右 孩子 都 不 曾 被 访问 
{ // 向 左 
HT[c]. weight = 1; // 左 孩 子 被 访问 过 , 右 孩 子 不 曾 被 访问 的 标志 
证 (HT[c].lchild!= 0) // 有 左 孩 子 (不 是 叶子 结 点 ) 
{ c=HT[c].lchild; // 置 为 其 左 孩子 序号 (向 叶子 方向 走 一 步 ) 
cd[cdlen++ ] = '0'; // 左 分 支 编码 为 0 
} 
else if(HT[cj.rchild== 0) // 序号 c 为 叶子 结 点 ( 既 没有 左 孩子 ,也 没有 右 孩 子 ) 
{ // 登记 叶子 结 点 的 字符 的 编码 
HC[c]= (char * )malloc((cdlen+ 1) x sizeof(char)); // 生成 编码 空间 
cd[cdlen] = \0'; // 最 后 一 个 位 置 赋 0( 串 结束 符 ) 
strcpy(HC[c],cd); // 复制 编码 ( 串 ) 
} 
} 
else if(HT[c].weight ==1) // 左 孩 子 被 访问 过 , 右 孩 子 不 曾 被 访问 


{ // 向 右 
HT[c]. weight = 2; // 左右 孩子 均 被 访问 过 的 标志 
证 (HT[c].rchild!= 0) // 有 右 孩 子 ( 不 是 叶子 结 点 ) 
{ c=HT[c].rchild; // 置 c 为 其 右 孩 子 序号 (向 叶子 方向 走 一 步 ) 
cd[cdlen++ ] = '1'; // 右 分 支 编码 为 1 
} 
} 
else // 左右 孩子 均 被 访问 过 (HT[c]. weight == 2) ,向 根 结 点 方向 退 一 步 
{ c=HT[c].parent; // 置 c 为 其 双亲 序号 (向 根 方向 退 一 步 ) 
一 cdlen; // 退 到 父 结 点 ,编码 长 度 减 1 


} 

free(cd); // 释放 求 编码 的 空间 
} 
间 include"func6-4. cpp" // 主 函 数 


程序 运行 结果 (以 教科 书 例 6-2 为 例 ) : 


树 和 二 叉 树 


请 输入 权 值 的 个 数 (二 1): 8 
请 依次 输入 8 个 权 值 ( 整 型 ) : 
5:29 7 14 23 .311 这 

0110 

10 

1110 

当量 生生 
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00 

0111 

010 
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图 是 比较 复杂 的 数据 结构 , 它 由 顶点 和 顶点 之 间 的 弧 或 边 组 成 。 任 何 两 个 顶点 之 间 都 
可 能 存在 弧 或 边 。 利 用 计算 机 存储 图 的 信息 ,就 要 求 能 存储 有 关 图 的 所 有 信息 。 也 就 是 要 


章 介绍 了 两 种 图 的 存储 结构 ,它们 各 有 特点 ,都 能 够 存储 图 的 所 有 信息 。 
7.1.1 数组 表示 法 


// c7-1.h 图 的 数组 (邻接 和 矩阵) 存储 结 构 。 在 教科 书 第 161 页 ( 见 图 7-1) 
间 define INFINITY INT MAX // 用 整 型 最 大 值 代替 ~ 
typedef int VRType; // 定义 顶点 关系 类 型 为 整 型 ,与 INFINITY 的 类 型 一 致 
间 define MAX_VERTEX_NUM 26 // 最 大 顶点 个 数 
enum GraphKind{DG,DN,UDG,UDN}; //{ 有 向 图 ,有 向 网 ,无 向 图 ,无 向 网 } 
typedef struct // 边 ( 弧 ) 信 息 结构 
{ VRTYpe adj; // 顶点 关系 类 型 。 对 无 权 图 ,用 1( 是 ?或 0( 否 ) 表 示 相 邻 否 ; 对 带 权 图 , 则 为 权 值 
InfoType * info; // 该 弧 相关 信息 的 指针 (可 无 ) 
}ArcCell ,RdjMatrix[MAX_VERTEX_NUM][MAX_VERTEX_NUM]; // 二 维 数组 
struct MGraph // 图 的 结构 
{ VertexType vexs[MAX_VERTEX_NUM]; // 顶点 向 量 
AdjMatrix arcs; // 邻接 矩阵 (二 维 数组 ) 
int vexnum,arcnum; // 图 的 当前 顶点 数 和 弧 数 
GraphKind kind; // 图 的 种 类 标志 
}s 


在 c7-1.h 中 ,定义 顶点 关系 类 型 VRType 为 整 型 ,对 于 图 ,其 值 是 0 或 1; 对 于 网 ( 带 权 
图 ) ,其 值 是 权 值 ,一 般 是 整 型 ,也 可 根据 情况 定义 为 浮 点 型 。 那样 就 需要 把 INFINITY 也 
相应 定义 为 浮 点 型 最 大 值 。 

结构 体 MGraph 中 存储 顶点 信息 的 类 型 是 VertexType 类 型 (顶点 类 型 ) , 它 一 般 是 结 
构 体 ,用 来 存储 有 关 顶 点 的 一 切 信息 。 如 : 顶点 名 称 、 顶 点 坐标 等 。 图 的 顶点 信息 因 图 而 


异 ,最 简单 的 VertexType 类 型 只 包括 一 个 成 员 : 顶点 名 称 。 [0] 
func7-1. cpp 定义 了 最 简单 的 顶点 类 型 和 对 这 种 顶点 类 型 的 DArecell 
输入 输出 操作 。 vexs| :| ad | InfoType 
| |[24] info 才 国 _ ___i 
// func7-1. cpp 包括 项 点 信息 类 型 的 定义 及 对 它 的 操作 [| 
间 define MAX_NAME 9 // 顶点 名 称 字符 串 的 最 大 长 度 +1 [0] [1] 1. [24] [25] 


struct VertexType // 最 简单 的 顶点 信息 类 型 (只 有 顶点 名 称 ) 
{ char name[ MAX_NAME |]; // 顶点 名 称 5 
村 arcs . 
void Visit(VertexType ver) // 与 之 配套 的 访问 顶点 的 函数 


{ printf("%s" ,ver.name); 


} Vvexnum 
arcnum 
void Input(VertexType &ver) // 与 之 配套 的 输入 顶点 信息 的 函数 kind 
{ scanf("%s",ver.name); MGraph 
} 
void InputFromFile(FILE # 上 ,VertexType &ver) 图 ?1 本 的 汪汪 全 全 
// 与 之 配套 的 从 文件 输入 顶点 信息 的 函数 在 售 各 构 


{ fscanf(f,"%s",ver.name); 


} 


MGraph 中 存储 弧 ( 边 ) 信 息 的 类 型 是 AdjMatrix 类 型 , 它 是 一 个 二 维 数组 ,用 来 存储 任意 2 
顶点 之 间 的 弧 ( 边 ) 信 息 。 数 组 的 元 素 类 型 是 ArcCell 类 型 , 它 是 结构 体 类 型 ,包括 VRType 和 
InfoType * 类 型 。VRType 是 数值 型 的 ,一 般 是 整 型 ,存储 0.1,.== 或 权 值 ; InfoType 一 般 是 结 
构 体 类 型 ,存储 弧 ( 边 ) 的 相关 信息 ,如 果 是 文字 信息 ,InfoType* 就 应 是 char * 类 型 。 结 构 
简单 的 弧 ( 边 ) ,也 可 能 没有 相关 信息 , 则 要 设 指针 为 空 。func7-2. cpp 定义 了 弧 ( 边 ) 的 相关 
信息 类 型 为 字符 型 和 对 这 种 类 型 的 输入 输出 操作 。 


// func7-2.cpp 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
间 define MAX_INFO 20 // 弧 ( 边 ) 的 相关 信息 字符 串 的 最 大 长 度 +1 
typedef char InfoType; // 弧 ( 边 ) 的 相关 信息 类 型 
void InputArc(InfoType #&arc) // 与 之 配套 的 输入 弧 ( 边 ) 的 相关 信息 的 函数 
{ char s[MAX_INF0]; // 临时 存储 空间 
int mi 
printf(" 请 输入 该 弧 ( 边 ) 的 相关 信息 (二 %d 个 字符 ): " ,MAX_INFO) ; 
gets(s); // 输入 字符 串 ( 可 包括 空格 ) 
m= strlen(s); // 字符 串 长 度 
if(m) // 长 度 不 为 0 
{ arc= (char * )malloc((m+1) x* sizeof(char)); // 动态 生成 相关 信息 存储 空间 
strcpy(arc,s); // 复制 s 到 arc 
} 
} 
void InputArcFromFile(FILE#f.,InfoType#&arc) // 由 文件 输入 弧 ( 边 ) 的 相关 信息 的 函数 
{ char s[MAX_INF0]; // 临时 存储 空间 
fgets(s:MRAX_INF0.f); // 由 文件 输入 字符 串 ( 可 包括 空格 ) 
arc= (char * )malloc((strlen(s) + 1) * sizeof(char)); // 动态 生成 相关 信息 存储 空间 
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strcpy(arc,s); // 复制 s 到 arc 
} 
void OutputArc(InfoType# arc) // 与 之 配套 的 输出 弧 ( 边 ) 的 相关 信息 的 函数 
{ printf("%s\n" ,arc); 
} 


图 7-2 是 根据 c7-1. h 定义 的 有 向 图 的 存储 示例 。vexs[ ] 数 组 存放 各 顶点 的 信息 ,arcs[][] 
数组 存放 各 顶点 邻接 关系 (是 否 互 为 邻接 点 ) 信 息 , 如 果 1 条 弧 从 第 i 个 顶点 发 出 ,终止 于 第 
j 个 顶点 , 则 arcs[ 让 [jj 二 1。 以 图 7-2(b) 为 例 ,arcs[0][1]==1, 说 明 从 vl 到 v2 有 1 条 弧 。 
设 对 角 元 素 (arcs[ij[ 让 ) 的 邻接 关系 为 0, 则 arcs[][] 数 组 中 值 为 1 的 元 素 的 个 数 等 于 有 向 
图 的 弧 数 。 图 7-3 是 根据 c7-1.h 定义 的 无 向 网 (网 也 称 为 带 权 图 ) 的 存储 示例 。 同 图 7-2 一 
样 , 图 7-3 中 的 vexs[] 数 组 仍 存放 各 顶点 的 信息 ,arcs[][] 数 组 存放 各 顶点 邻接 关系 信息 。 
对 于 网 ,顶点 互 为 邻接 点 , 则 其 值 为 权 值 ; 否则 其 值 为 co。 设 对 角 元 素 (arcs[ 让 [让 ) 的 邻接 关 
系 为 oo。 如 果 在 第 i 个 顶点 和 第 j 个 顶点 之 间 有 边 (无 向 ), 则 arcs[ 记 [jj] 二 arcs[jj[ 记 == 权 值 。 
以 图 7-3(b) 为 例 ,arcs[0J[1]== arcs[1j[0j]==3, 说 明 在 v1、v2 之 间 有 1 条 边 ,其 权 值 为 3。 
无 向 图 或 网 的 二 维 数组 是 以 主 对 角 线 为 轴 对 称 的 ,对 称 的 两 个 单元 表示 同一 条 边 。arcs[][] 
数组 中 值 不 为 = 的 元 素 的 个 数 等 于 无 向 网 边 数 的 2 信 。 
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图 7-2 有 向 图 的 数组 (邻接 和 矩阵) 存储 示例 


在 这 种 数组 (邻接 矩阵 ?存储 结构 中 ,数组 所 占用 的 存储 空间 与 图 的 弧 ( 边 ) 数 无 关 , 从 节 
约 存储 空间 方面 考虑 , 它 适 用 于 边 数 较 多 的 稠密 图 。 


// bo7-1. cpp 图 的 邻接 矩阵 存储 (存储 结构 由 c7-1.h 定义 ) 的 基本 操作 (17 个 ), 包 括 算法 7.1 和 算法 7.2 
int LocateVex(MGraph G.VertexType u) 
{ // 初始 条 件 : 图 G 存 在 ,u 和 SG 中 顶点 有 相同 特征 (顶点 名 称 相同 ) 
// 操作 结果 : 若 6 中 存在 顶点 u, 则 返回 该 顶点 在 图 中 位 置 (序号 ); 否则 返回 -1 
int i; 
for(i= 0;i<G.vexnumi+ti) // 对 于 所 有 顶点 依次 查找 
证 (strcmp(u. name,G. vexs[i].name) == 0) // 顶点 与 给 定 的 u 的 顶点 名 称 相同 


vi |[ol 

vw [1] 

V3 [3 第 3 列 值 不 为 w 的 元 素 
: ”表明 v3 与 其 之 间 有 边 。 

其 值 即 为 权 值 


3 加 0] [2 -… [25] 
0 第 2 行 值 不 为 “的 元 素 |”3 “”. 
5 表明 v2 与 其 之 间 有 边 。 | 3 5 . .上 0] 
® 其 值 即 为 权 什 5 


(a) 无 向 网 (无 相关 信息 ) (b) 存储 结构 (对 称 和 矩阵 ) 
图 7-3 无 向 网 的 数组 (邻接 矩阵 ?存储 示例 


return i; // 返回 顶点 序号 
return - 1; // 图 6G 中 不 存在 与 顶点 u 有 相同 名 称 的 顶点 
} 
void CreateDG(MGraph &G) 
{ // 采用 数组 (邻接 矩阵 ?表示 法 ,构造 有 向 图 G 
int i,j,k,IncInfo; // IncInfo 为 0 则 弧 不 含 相关 信息 
VertexType v1,v2; // 顶点 类 型 
printf(" 请 输入 有 向 图 6 的 顶点 数 , 弧 数 , 弧 是 否 含 相关 信息 (是 : 1 否 : 0): "); 
scanf("%d, %d, %d",&G.vexnum,&G.arcnum,&IncInfo); 
printf(" 请 输入 %d 个 顶点 的 值 (名 称 二 %d 个 字符 ): \n",G. vexnum,MAX_NAME); 
for(i= 0;i<G. vexnum;+#i) // 构造 顶点 向 量 
Input(G. vexs[i]); // 根据 项 点 信息 的 类 型 ,输入 顶点 信息 ,在 func7-1. cpp 中 
for(i=0;i<G.vexnum;+ti) // 初始 化 二 维 邻 接 矩 阵 ( 弧 ( 边 ) 信 息 ) 
for(j= 0;j 一 G. vexnum;++j) 
{ G.arcs[i][j].adj=0; // 图 ,不 相 邻 
G.arcs[i][j].info=NULL; // 无 相关 信息 
} 
printf(" 请 输入 %d 条 弧 的 弧 尾 弧 头 : \n",G.arcnum); 
for(k= 0;k 一 G.arcnum;++k) 
{ scanf("%s%s%Sxc",vl.name,v2.name); // 名 *c 吃 掉 回 车 符 
i = LocateVex(G,v1); // 弧 尾 的 序号 
j= LocateVex(G,v2); // 弧 头 的 序号 
G.arcs[i][j].adj=1; // 有 向 图 
if(IncInfo) // 有 相关 信息 
InputArc(G. arcs[i][j]. info); 
// 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-2. cpp 中 
} 
G. kind = DG; 
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void CreateDN(MGraph &G) 
{ // 采用 数组 (邻接 和 矩阵) 表示 法 ,构造 有 向 网 G 


} 


int i,j,k,IncInfo; // IncInfo 为 0 则 弧 不 含 相关 信息 
VRType w; // 顶点 关系 类 型 
VertexType v1,v2; // 顶点 类 型 
printf(" 请 输入 有 向 网 G 的 顶点 数 , 弧 数 , 弧 是 否 含 相关 信息 (是 : 1 否 : 0): "); 
scanf("%d, %d, %d",&G.vexnum,&G.arcnum, &IncInfo); 
printf(" 请 输入 %d 个 顶点 的 值 (名 称 二 %d 个 字符 ): \n" ,G. vexnum,MAX NAME); 
for(i= 0;i<G.vexnum;+ti) // 构造 顶点 向 量 
Input(G. vexs[i]); // 根据 项 点 信息 的 类 型 ,输入 顶点 信息 ,在 func7-1.cpp 中 
for(i= 0;i<G. vexnum;+i) // 初始 化 二 维 邻 接 矩 阵 
for(j = 0;j 一 G. vexnum;++j) 
{ G.arcs[i][j].adj = INFINITY; // 网 ,不 相 邻 
G.arcs[ 订 [jj. info= NULL; // 无 相关 信息 
} 
printf(" 请 输入 %d 条 弧 的 弧 尾 弧 头 权 值 : \n" ,G.arcnum); 
for(k = 0;k 一 G.arcnum;++k) 
{ scanf("%s%s%d% x*xc",vl.name,v2.name,&w); // 名 x*c 吃 掉 回 车 符 
i= LocateVex(G,v1); // 弧 尾 的 序号 
j= LocateVex(G,v2); // 弧 头 的 序号 
G.arcs[i][j].adj=w; // 有 向 网 
if(IncInfo) // 有 相关 信息 
InputArc(G. arcs[i][j]. info); 
// 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-2. cpp 中 
} 
G.kind = DN; 


void CreateUDG(MGraph &G) 
{ // 采用 数组 (邻接 矩阵 ) 表 示 法 ,构造 无 向 图 6 


int i,j,k,IncInfo; // IncInfo 为 0 则 弧 不 含 相关 信息 
VertexType v1,v2; // 顶点 类 型 
printf(" 请 输入 无 向 图 G 的 顶点 数 , 边 数 , 边 是 否 含 相关 信息 (是 : 1 否 : 0): "); 
scanf("%d, %d, %d",&G.vexnum,&G.arcnum,&IncInfo); 
printf(" 请 输入 %d 个 顶点 的 值 (名 称 二 %d 个 字符 ): \n" ,G. vexnum,MAX_NAME) ; 
for(i= 0;i<G.vexnum;+ti) // 构造 顶点 向 量 

Input(G. vexs[ 订 ); // 根据 顶点 信息 的 类 型 ,输入 顶点 信息 ,在 func7-1.cpp 中 
for(i= 0;i<G.vexnum;+ti) // 初始 化 二 维 邻 接 和 矩阵 ( 弧 ( 边 ) 信 息 ) 

for(j = 0;j 一 G. vexnum;+f+]j) 

{ G.arcs[i][jj.adj=0; // 图 ,不 相 邻 

G.arcs[i]j[j].info=NULL; // 无 相关 信息 

} 
printf(" 请 输入 %d 条 边 的 顶点 1 顶点 2: \n" ,6G.arcnum); 
for(k = 0;k 一 G. arcnum;++k) 
{ scanf("%s%s%S x*c",vl.name,v2.name); // 名 *c 有 吃 掉 回 车 符 


i= LocateVex(G,v1); // 顶点 1 的 序号 
j= LocateVex(G,v2); // 顶点 2 的 序号 
G.arcs[i][jj.adj =1; // 图 
if(IncInfo) // 有 相关 信息 
InputArc(G. arcs[i][j]. info); 
// 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-2.cpp 中 
G.arcs[jj[i] = G.arcs[i][j]; // 无 向 ,两 个 单元 的 信息 相同 
} 
G.kind = UDG; 

} 

void CreateUDN(MGraph &G) 

{ // 采用 数组 (邻接 矩阵 ) 表 示 法 ,构造 无 向 网 G。 算 法 7.2 
int i,j,k,IncInfo; // IncInfo 为 0 则 弧 不 含 相关 信息 
VRTYpe w; // 顶点 关系 类 型 
VertexType v1,v2; // 顶点 类 型 
printf(" 请 输入 无 向 网 G 的 顶点 数 , 边 数 , 边 是 否 含 相关 信息 (是 : 1 否 : 0): "); 
scanf("%d, %d, %d",&G.vexnum,&G.arcnum,&IncInfo); 
printf(" 请 输入 %d 个 顶点 的 值 (名 称 二 %d 个 字符 ): \n",G. vexnum,MAX_NAME); 
for(i= 0;i<G. vexnum;+ti) // 构造 顶点 向 量 

Input(G. vexs[i]); // 根据 顶点 信息 的 类 型 ,输入 顶点 信息 ,在 func7-1.cpp 中 
for(i= 0;i<G. vexnum;+ti) // 初始 化 二 维 邻 接 和 矩阵 
for(]j = 0;]j 二 G. vexnum;+ 雪 ) 
{ G.arcs[i][j].adj = INFINITY; // 网 ,不 相 邻 
G,arcs[i][j]. info= NULL; // 无 相关 信息 
} 
printf(" 请 输入 %d 条 边 的 顶点 1 顶点 2 权 值 : \n",G.arcnum); 
for(k = 0;k<—6G.arcnum;++tk) 
{ scanf("%s%s%d% x*c",vl.name,v2.name,&w); // 名 xc 了 吃 掉 回 车 符 
i= LocateVex(G,v1); // 顶点 1 的 序号 
j= LocateVex(G,v2); // 顶点 2 的 序号 
G.arcs[i][jj.adj=w; // 网 
证 (IncInfo) // 有 相关 信息 
InputArc(G. arcs[i][j]. info); 
// 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-2. cpp 中 
G.arcs[j][i] = G.arcs[ij[j]; // 无 向 ,两 个 单元 的 信息 相同 
} 
G.kind = UDN; 

} 

void CreateGraph( MGraph &G) 

{ // 采用 数组 (邻接 矩阵 ?表示 法 ,构造 图 6。 修 改 算法 7.1 
printf(" 请 输入 图 G 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): "); 
scanf("%d",&G.kind); 
switch(G.kind) // 根据 图 6 的 类 型 .调用 不 同 的 构造 图 的 函数 
{ case DG:CreateDG(G); // 构造 有 向 图 
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break; 

case DN:CreateDN(G); // 构造 有 向 网 
break; 

case UDG: CreateUDG(G); // 构造 无 向 图 
break; 

case UDN: CreateUDN(G) ; // 构造 无 向 网 


} 
VertexType GetVex(MGraph G, int v) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 顶点 的 序号 。 操 作 结果 : 返回 v 的 值 
if(v>= G.vexnum| |v<0) // 图 G 中 不 存在 序号 为 v 的 顶点 
exit(OVERFLOW) ; 
return G. vexs[v]; // 返回 该 顶点 的 信息 
} 
Status PutVex(MGraph &G, VertexTYpe v., VertexType value) 
// 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 顶点 。 操 作 结 果 : 对 v 赋 新 值 value 
int k = LocateVex(G,v); // k 为 顶点 v 在 图 G 中 的 序号 
if(k 二 0) // 不 存在 顶点 v 
return ERROR; 
G.vexs[k] = value; // 将 新 值 赋 给 顶点 v( 其 序号 为 k) 
return OK; 
} 
int FirstAdjVex( MGraph G,int v) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 顶点 的 序号 
// 操作 结果 : 返回 v 的 第 1 个 邻接 顶点 的 序号 。 若 顶点 在 6 中 没有 邻接 顶点 , 则 返回 -1 
int i; 
VRType j= 0; // 顶点 关系 类 型 ,图 
if(G.kind%2) // 网 
j= INFINITY; 
for(i=0;i<G.vexnum;i++ ) // 从 第 1 个 顶点 开始 查找 
if(G.arcs[vj[i].adj!=j) // 是 第 1 个 邻接 顶点 
return i; // 返回 该 邻接 顶点 的 序号 
return -1; // 没有 邻接 顶点 
} 
int NextAdjVex(MGraph G, int v,int w) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 顶点 的 序号 ,w 是 v 的 邻接 顶点 的 序号 
// 操作 结果 : 返回 v 的 (相对 于 mw 的) 下 一 个 邻接 顶点 的 序号 ， 
// 若 w 是 的 最 后 一 个 邻接 顶点 , 则 返回 -1 
int is 
VRType j= 0; // 顶点 关系 类 型 ,图 
if(G.kind%2) // 网 
j= INFINITY; 


for(i=wt+1;i<<G.vexnum;i++ ) // 从 第 w+1 个 顶点 开始 查找 
if(G.arcs[vj[i].adj!=j) // 是 从 w+1 开始 的 第 1 个 邻接 顶点 


return i; // 返回 该 邻接 顶点 的 序号 
return - 1; // 没有 下 一 个 邻接 顶点 
} 
void InsertVex(MGraph &G.VertexType v) 
{ // 初始 条 件 : 图 6 存在 ,v 和 图 6 中 顶点 有 相同 特征 
// 操作 结果 : 在 图 6 中 增添 新 项 点 v( 不 增添 与 顶点 相关 的 弧 ,留待 Insertarc() 去 做 ) 
int i; 
VRType j= 0; // 顶点 关系 类 型 ,图 
if(G.kind%2) // 网 
j= INFINITY; 
G. vexs[G. vexnum] =v; // 将 值 v 赋 给 新 顶点 
for(i=0;i<=G.vexnum;i++ ) // 对 于 新 增 行 、 新 增 列 
{ G.arcs[G. vexnum|[i].adj = G.arcs[i][G. vexnum].adj = j; 
// 初始 化 新 增 行 .新 增 列 邻接 矩阵 的 值 ( 无 边 或 弧 ) 
G.arcs[G. vexnum][i]. info = G.arcs[i][G. vexnum]. info = NULL; // 初始 化 相关 信息 指针 
} 
G.vexnum++; // 图 6 的 顶点 数 加 1 
} 
Status InsertArc(MGraph &G.VertexType v.VertexType w) 
{ // 初始 条 件 : 图 6 存在 ,v 和 w 是 6G 中 两 个 顶点 
// 操作 结果 : 在 6 中 增添 弧 <v,w> , 若 6 是 无 向 的 , 则 还 增添 对 称 弧 到 w,v 二 
int i,vl ,wl; 
V1 = LocateVex(G,v); // 弧 尾 顶点 v 的 序号 
wl = LocateVex(G,w); // 弧 头顶 点 w 的 序号 
ifE(Cv1 过 0| ml 过 0) // 不 存在 顶点 v 或 w 
return ERROR; 
G.arcnum++; // 弧 或 边 数 加 1 
if(G.kind%2) // 网 
{ printf(" 请 输入 此 弧 或 边 的 权 值 :"); 
scanf("%d" ,&G.arcs[v1][Lwl].adj); 
} 
else // 图 
G.arcs[v1][wl].adj=1; 
printf(" 是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): "); 
scanf("%d% *c",&i); 
if(i) 
Inputarc(G. arcs[vl][wl]. info); // 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-2. cpp 中 
证 (G.kind>1) // 无 向 
G.arcs[wlj[v1]= G.arcs[vl][wl]; // 有 同样 的 邻接 值 .指向 同一 个 相关 信息 
return OK; 
} 
Status DeleteArc(MGraph &G. VertexType v.VertexType w) 
{ // 初始 条 件 : 图 6 存在 ,v 和 w 是 6 中 两 个 顶点 
// 操作 结果 : 在 6 中 删除 弧 二 v,w ,车 6 是 无 向 的 , 则 还 删除 对 称 弧 二 w,v 
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int vil,wl; 
VRType j= 0; // 顶点 关系 类 型 ,图 
if(G.kind%2) // 网 
j= INFINITY; 
1 = LocateVex(G,v); // 弧 尾 顶点 的 序号 
ml = LocateVex(G,w); // 弧 头顶 点 的 序号 
if(v1<<0||wl<<0) // 不 存在 顶点 v 或 w 
return ERROR; 
if(G.arcs[v1][w1].adj!=j) // 有 弧 二 v,w>> 
{ G.arcs[v1][w1].adj=j; // 删除 弧 二 v,w 二 
if(G.arcs[v1][wl]. info) // 有 相关 信息 
{ free(G.arcs[v1][w1]. info); // 释放 相关 信息 
G.arcs[vl][wl].info=NULL; // 置 相关 信息 指针 为 空 
} 
if(G.kind= 2) // 无 向 ,删除 对 称 弧 二 w,v 二 
G.arcs[wl][v1]= G.arcs[vl][wl];, // 删除 弧 , 置 相关 信息 指针 为 空 
G.arcnum--; // 弧 数 一 1 
} 
return OK; 
} 
Status DeleteVex(MGraph &G, VertexType v) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 项 点。 操作 结果 : 删除 6 中 顶点 v 及 其 相关 的 弧 
int ij,ki 
k= LocateVex(G,v); // k 为 待 删除 顶点 的 序号 
if(k<0) // v 不 是 图 G 的 顶点 
return ERROR; 
for(i=0;i<G.vexnum;i++ ) 
DeleteArc(G,v,G. vexs[i]); // 删除 由 顶点 发 出 的 所 有 弧 
证 (G.kind<<2) // 有 向 
for(i=0;i<~G.vexnum;i++ ) 
Deletearc(G.G.vexs[ij,v); // 删除 发 向 顶点 v 的 所 有 弧 
for(j=k+1;j<G. vexnum;j++ ) 
G. vexs[j 一 1] = G.vexs[j]; // 序号 k 后 面 的 顶点 向 量 依 次 前 移 
for(i= 0;i<~G.vexnum;i++ ) 
for(j=k+1;j<6G.vexnum;j++ ) 
G.arcs[i][j-1]= 6G.arcs[i][j]; // 移动 待 删除 顶点 之 右 的 矩阵 元 素 
for(i=0;i<~G.vexnum;i++ ) 
for(j=k+1;]j 一 G.vexnum;j++ ) 
G.arcs[j -1][i] = G.arcs[j][i]; // 移动 待 删除 顶点 之 下 的 矩阵 元 素 
G.vexnum--; // 更 新 图 的 顶点 数 
return OK; 
} 
void DestroyGraph( MGraph &G) 
{ // 初始 条 件 : 图 6 存在。 操作 结果 : 销毁 图 G 


int 8 


for(i= G.vexnum-1;i>=0;i 一 ) // 由 大 到 小 逐一 删除 顶点 及 与 其 相关 的 弧 ( 边 ) 


DeleteVex(G,G. vexs[ i]); 
} 
void Display(MGraph G) 
{ // 输出 邻接 矩阵 存储 结构 的 图 6 

int i,j; 

char s[7] = "无 向 网 ",sl[3]= " 边 "， 

Switch(G.kind) 

{ case DG:strcpy(s," 有 向 图 "); 
strcpy(sl," 弧 "); 
break; 

case DN:;strcpy(s," 有 向 网 "); 
strcpy(s1l," 弧 "); 
break; 

case UDG; strcpy(s, "无 向 图 "); 

case UDN: ; 


} 


printf("%d 个 顶点 sd 条 s$%s 的 ss。 顶 点 依次 是 : ",G.vexnum,G.arcnum,sl,s); 


for(i=0;i<G.vexnum;++i) 


Visit(GetVex(G,i)); // 根据 顶点 信息 的 类 型 ,访问 第 并 个 顶点 ,在 func7-1.cpp 中 


printf("\nG. arcs.adj: \n"); 


for(i = 0;i<G. vexnum;i++ ) // 输出 二 维 数组 6G.arcs. adj 


{ for(j = 0;j 一 G. vexnum;j++) 
printf("%11d",G.arcs[i][j].adj); 
printf("\n"); 
; 
printf("G.arcs. info: \n"); // 输出 G.arcs. info 
if(G.kind<<2) // 有 向 
printf(" 弧 尾 弧 头 该 %s 的 信息 : \n" .sl); 
else // 无 向 
printf(" 顶 点 1 顶点 2 该 %s 的 信息 : \n" ,sl); 
for(i=0;i<~G.vexnum;it++ ) 
i£(G.kind<2) // 有 向 
{ for(j = 0;]j 一 G.vexnum;j++ ) 
if(G.arcs[i][j]. info) 


{ printf("%5s %5s ",G.vexs[i].name,G. vexs[j].name); 
OutputArc(G.arcs[i][j]. info); // 输出 弧 ( 边 ) 的 相关 信息 ,在 func7-2.cpp 中 


} 
) // 加 括号 为 避免 if-else 对 配 错 
else // 无 向 ,输出 上 三 角 


for(j =i+1;j<G. vexnum;j++ ) 
if(G.arcs[i][j]. info) 


{ printf("%5s%5s",G.vexs[i].name.G.vexs[j]. name); 
OutputArc(G.arcs[i][j]. info); // 输出 弧 ( 边 ) 的 相关 信息 ,在 func7-2. cpp 中 


} 


void CreateFromFile(MGraph &G.char# filename.int IncInfo) 


9 


180 


数据 结构 算法 解析 


{ // 采用 数组 (邻接 和 矩阵) 表示 法 ,由 文件 构造 图 或 网 G。IncInfo = 0 或 1, 表 示 弧 ( 边 ) 无 或 有 相关 信息 
int i,j,k; 
VRTYpe w= 0; // 顶点 关系 类 型 ,图 
VertexType v1,v2; // 顶点 类 型 
FILE * f; // 文件 指针 类 型 
f= fopen(filename,"r"); // 打开 数据 文件 ,并 以 f 表 示 
fscanf(f,"%d",&G.kind); // 由 文件 输入 G 的 类 型 
if(G.kind%2) // 网 

w= INFINITY; 
fscanf(f,"%d",&G. vexnum); // 由 文件 输入 6 的 顶点 数 
for(i=0;i<G.vexnum;++i) 

InputFromFile(f,G. vexs[i]); // 由 文件 输入 顶点 信息 ,在 func7-1. cpp 中 
fscanf(f,"%d",&G.arcnum); // 由 文件 输入 6 的 弧 ( 边 ) 数 
for(i=0;i<G.vexnum;+ti) // 初始 化 二 维 邻 接 矩 阵 

for(j = 0;]j 一 G. vexnum;++j) 

{ G.arcs[ 计 j[ 订 .adj = w; // 不 相 邻 

G.arcs[i][j]. info= NULL; // 没有 相关 信息 

} 
if(1(G.kind%2)) // 图 

w=1; 
for(k = 0;k 一 G.arcnum;++k) // 对 于 所 有 弧 
{ fscanf(f,"%s%s",vl.name,v2.name); // 输入 弧 尾 、 弧 头 的 名 称 

if(G.kind%2) // 网 

fscanf(f,"%d",&w); // 再 输入 权 值 

i= LocateVex(G,v1); // 弧 尾 的 序号 

j= LocateVex(G,v2); // 弧 头 的 序号 

G.arcs[i][j].adj=w; // 权 值 

if(IncInfo) // 有 相关 信息 

InputArcFromFile(f,G.arcs[i][j]. info); 
// 由 文件 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-2.cpp 中 

if(G.kind>1) // 无 向 

G.arcs[j][i] = G.arcs[i][jj]; // 无 向 ,两 个 单元 的 信息 相同 
} 
fclose(f); // 关闭 数据 文件 
} 


// func7-3. cpp 用 于 检验 邻接 矩阵 和 邻接 表 的 主 函 数 
void main() 
{ 

int jyas 

char s[3] = " 边 "; 

Graph g; // 抽象 的 图 类 型 

VertexType v1,v2; // 顶点 类 型 

printf(" 请 依次 选择 有 向 图 ,有 向 网 ,无 向 图 .无 向 网 : \n"); 

for(i=0;i<4;i++ ) // 验证 4 种 情况 

{ CreateGraph(g); // 构造 图 g 

Display(g); // 输出 图 g 


printf(" 插 和 人 新 顶点 ,请 输入 新 顶点 的 值 : "); 
Input(v1); // 根据 项 点 信息 的 类 型 ,输入 顶点 v 的 信息 ,在 func7-1.cpp 中 
InsertVex(g,v1); // 在 图 g 中 插入 顶点 vi 
if(g.kind<<2) // 有 向 
strcpy(s," 弧 "); 
printf(" 插 入 与 新 项 点 有 关 的 %s, 请 输入 %s 数 : " ,s,s); 
scanf("%d",&n); 
for(Ck= 0;k<nikt++ ) // 依次 插入 n 条 弧 ( 边 ) 
printf(" 请 输入 另 一 顶点 的 名 称 : "); 
scanf("%s" ,v2.name); 
if(g.kind<<=1) // 有 向 
{ printf(" 请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): "); 
scanf("%d",&j); 
if(j) // v2 是 弧 尾 
InsertArc(g,v2,v1); // 在 图 g 中 插入 弧 v2 一 v1 
else // v2 是 弧 头 
Insertarc(g,vl,v2); // 在 图 g 中 插入 弧 vi 一 v2 


} 
else // 无 向 
Insertarc(g,vl,v2); // 在 图 g 中 插入 边 vi 一 v2 
} 
Display(g); // 输出 图 g 
Printf(" 删 除 顶 点 及 相关 的 $s, 请 输入 待 删除 顶点 的 名 称 : ",s); 
scanf("%s",v1.name); 
DeleteVex(g,v1); // 在 图 g 中 删除 顶点 vi 
Display(g); // 输出 图 9 
if(i== 3) // 对 于 最 后 一 个 (无 向 网 ) ,测试 以 下 函数 
{ printf(" 修 改 顶 点 的 值 ,请 输入 待 修改 顶点 名 称 新 值 : "); 
scanf("%s" ,vl.name); // 输入 待 修改 顶点 名 称 ,以 查找 待 修改 的 顶点 
Input(v2); // 输入 顶点 的 新 值 ,以 代替 原 值 
PutVex(g,v1,v2); // 将 图 g 中 顶点 v1 的 值 改 为 v2 
if(g.kind<2) // 有 向 (假设 最 后 一 个 可 以 不 是 无 向 网 ) 
Printf(" 删 除 一 条 %s, 请 输入 待 删除 %s 的 弧 尾 弧 头 : " ,s,s); 
else // 无 向 
printf(" 删 除 一 条 %s, 请 输入 待 删除 ss 的 顶点 1 顶点 2: ",s,s); 
scanf("%sg%s",vl1.name,v2.name); // 输入 待 删除 弧 ( 边 ) 的 2 顶点 的 名 称 
Deletearc(g,vl,v2); // 删除 图 g 中 由 顶点 1 指向 顶点 v2 的 弧 ( 边 ) 
Display(g); // 输出 图 g 
} 
DestroyGraph(g); // 销毁 图 9 
} 
} 


// main7-1. cpp 检验 bo7-1. cpp 的 主 程序 

间 include"cl.h" 

# include" func7-1.cpp"// 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 

间 include"func7-2.cpp" // 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
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间 include"c7-1.h" // 图 的 数组 (邻接 和 矩阵) 存储 结构 

间 include"bo7-1.cpp" // 图 的 数组 (邻接 矩阵) 存储 结构 的 基本 操作 (17 个 ) 

typedef MGraph Graph; // 定义 func7-3.cpp 中 Graph 的 类 型 为 MGraph( 邻 接 和 矩阵 存储 结构 ) 
间 include"func7-3.cpp" // 主 了 清 数 


程序 运行 结果 : 


请 依次 选择 有 向 图 ,有 向 网 ,无 向 图 ,无 向 网 : 

请 输入 图 6 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 0 

请 输入 有 向 图 G 的 顶点 数 , 弧 数 , 弧 是 否 含 相关 信息 (是 : 1 否 : 0): 2,1,0y 
请 输入 2 个 顶点 的 值 ( 名 称 一 9 个 字符 ) : 


al a2w/ 
请 输入 1 条 弧 的 弧 尾 弧 头 : 
a2 al 好 
2 个 顶点 1 条 弧 的 有 向 图 。 顶 点 依次 是 : al a2 ( 见 图 7-4) 
G.arcs.adj: 图 7-4 不 含 相关 信息 的 有 向 图 
0 0 
1 0 


G.arcs. info: 

弧 尾 弧 头 该 弧 的 信息 : 

插入 新 顶点 ,请 输入 新 顶点 的 值 : a3 x 

插入 与 新 顶点 有 关 的 弧 ,请 输入 弧 数 : 2 

请 输入 另 一 顶点 的 名 称 : al 

请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 0 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): 0 
请 输入 另 一 顶点 的 名 称 : a2 x 

请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 1 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): 0 
3 个 顶点 3 条 弧 的 有 向 图 。 顶 点 依次 是 : al a2 a3 ( 见 图 7-5) 


: 一 他 
G.arcs.adj: \/ 
0 0 0 


© 
™ 


@®) 

0 1 

1 0 0 图 7-5 插入 顶点 a3 
G.arcs. info: 
弧 尾 弧 头 该 弧 的 信息 : 
删除 顶点 及 相关 的 弧 ,请 输入 待 删除 顶点 的 名 称 : al 
2 个 顶点 1 条 弧 的 有 向 图 。 顶 点 依次 是 : a2 a3 ( 见 图 7-6) ® 
G.arcs.adj: 

0 9 

0 0 


图 7-6 删除 顶点 al 


G.arcs. info: 

弧 尾 弧 头 该 弧 的 信息 : 

请 输入 图 6 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 1 

请 输入 有 向 网 G 的 顶点 数 , 弧 数 , 弧 是 否 含 相关 信息 (是 : 1 否 : 0): 2,1,1 
请 输入 2 个 顶点 的 值 ( 名 称 过 9 个 字符 ) : 

bl b2y 


请 输入 1 条 弧 的 弧 尾 弧 头 权 值 : 
bl b2 3 必 


请 输入 该 弧 ( 边 ) 的 相关 信息 (二 20 个 字符 ) : Good morning! 皮 


2 个 顶点 1 条 弧 的 有 向 网 。 顶 点 依次 是 : bl b2 ( 见 图 7-7) 


G.arcs.adj: 
32767 3 
32767 32767 
G.arcs. info: 


弧 尾 弧 头 该 弧 的 信息 : 
bl b2 Good morning! 
插入 新 顶点 ,请 输入 新 项 点 的 值 ; b3 
插入 与 新 顶点 有 关 的 弧 ,请 输入 弧 数 : 2 
请 输入 另 一 顶点 的 名 称 : bl x 
请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 0 
请 输入 此 弧 或 边 的 权 值 : 5 x 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有): 1 
请 输入 该 弧 ( 边 ) 的 相关 信息 (二 20 个 字符 ): Good day! x 
请 输入 另 一 顶点 的 名 称 : b2 上 
请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 1 
请 输入 此 弧 或 边 的 权 值 : 6 x 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): 1 
请 输入 该 弧 ( 边 ) 的 相关 信息 (一 20 个 字符 ) : Good bye! x 
3 个 顶点 3 条 弧 的 有 向 网 。 顶 点 依次 是 : bl b2 b3 ( 见 图 7-8) 


G.arcs.adj: 
32767 3 32767 
32767 32767 6 
5 32767 32767 


G.arcs. info: 
弧 尾 弧 头 该 弧 的 信息 : 
bl b2 Good morning! 
b2 b3 Good bye! 
b3 bl Good day! 
删除 项 点 及 相关 的 弧 , 请 输入 待 删除 顶点 的 名 称 : b2 必 
2 个 顶点 1 条 统 的 有 向 网 。 顶 点 依次 是 : bl b3 ( 见 图 7-9) 
G.arcs.adj: 
32767 32767 
5 32767 
G.arcs. info: 
弧 尾 弧 头 该 弧 的 信息 : 
b3 bl Good day! 


Good morning! 
3 
@) 人 
图 7-7 含 相关 信息 的 有 向 网 


Good morning! 


3 
人 人 
Good eo bye! 


人 
图 7-8 插入 顶点 b3 


图 7-9 删除 顶点 b2 


请 输入 图 6 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 2 
请 输入 无 向 图 G 的 顶点 数 , 边 数 , 边 是 否 含 相关 信息 (是 : 1 否 : 0): 2,1,1x 


请 输入 2 个 顶点 的 值 ( 名 称 二 9 个 字符 ) : 
el wa 


183 


184 


数据 结构 算法 解析 


请 输入 1 条 边 的 顶点 1 顶点 2: 
cl c2 wu/ 
请 输入 该 弧 ( 边 ) 的 相关 信息 (二 20 个 字符 ): good x 


顶点 1 顶点 2 该 边 的 信息 : 
ti 硬 good 
插入 新 顶点 ,请 输入 新 顶点 的 值 : c3 
插入 与 新 顶点 有 关 的 弧 ,请 输入 弧 数 : 2 
请 输入 另 一 顶点 的 名 称 : cl x 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): 1 
请 输入 该 弧 ( 边 ) 的 相关 信息 (二 20 个 字符 ): better 必 
请 输入 另 一 顶点 的 名 称 : c2 x 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): 1 
请 输入 该 弧 ( 边 ) 的 相关 信息 (二 20 个 字符 ): best 
3 个 顶点 3 条 边 的 无 向 图 。 顶 点 依次 是 : cl c2 c3 ( 见 图 7-11) 


G.arcs.adj: 
0 a 1 
1 0 1 
4 - 0 


G.arcs. info: 
顶点 1 顶点 2 该 边 的 信息 : 
cl  Cc2 good 
ei ¢3 better 
c2 ¢3 best 
删除 顶点 及 相关 的 弧 ,请 输入 待 删除 顶点 的 名 称 : c3 x 


2 个 顶点 1 条 边 的 无 向 图 。 顶 点 依次 是 : cl c2 ( 见 图 7-10) 
G.arcs.adj: 
0 1 图 7-10 含 相关 信息 的 无 向 图 
1 0 
G.arcs. info: 


图 7-11 插入 顶点 c3 


2 个 顶点 1 条 边 的 无 向 图 。 顶 点 依次 是 : cl c2 ( 见 图 7-12) 

G.arcs.adj: 
0 1 图 7-12 删除 顶点 c3 
1 0 

G.arcs. info: 

顶点 1 顶点 2 该 边 的 信息 : 

cl c2 good 

请 输入 图 6 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 3 

请 输入 无 向 网 6 的 顶点 数 , 边 数 , 边 是 否 含 相关 信 息 ( 是 : 1 否 : 0): 2,1,0y 

请 输入 2 个 顶点 的 值 ( 名 称 二 9 个 字符 ): 

dl d2 yw 

请 输入 1 条 边 的 顶点 1 顶点 2 权 值 : 

did25w 5 

2 个 顶点 1 条 边 的 无 向 网 。 顶 点 依次 是 : dl dz ( 见 图 7-13) 


G.arcs.adj: 图 7-13 不 含 相关 信息 的 无 向 网 


32767 5 
3 32767 

G.arcs. info: 
顶点 1 顶点 2 该 边 的 信息 : 
插入 新 顶点 ,请 输入 新 顶点 的 值 : d3 
搬入 与 新 顶点 有 关 的 弧 ,请 输入 弧 数 : 2 
请 输入 另 一 顶点 的 名 称 : dl 上 
请 输入 此 弧 或 边 的 权 值 : 4 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): 0 
请 输入 另 一 顶点 的 名 称 : d2 
请 输入 此 弧 或 边 的 权 值 : 6 
是 否 有 该 弧 或 边 的 相关 信息 (0: 无 1: 有 ): 0 
3 个 顶点 3 条 边 的 无 向 网 。 顶 点 依次 是 : dl d2 d3 ( 见 图 7-14) 


G.arcs.adj: 
32767 和 4 
5 32767 6 
4 6 32767 


图 7-14 插入 顶点 d3 


G.arcs. info: 
顶点 1 顶点 2 该 边 的 信息 : 
删除 顶点 及 相关 的 弧 ,请 输入 待 删除 项 点 的 名 称 : dl yx 


2 个 顶点 1 条 边 的 无 向 网 。 顶 点 依次 是 : d2 d3 ( 见 图 7-15) 由 
G.arcs. adj: 
32767 6 6 
6 32767 人 
ae 图 7-15 删除 顶点 dl 


顶点 1 顶点 2 该 边 的 信息 : 
修改 顶点 的 值 ,请 输入 待 修改 顶点 名 称 新 值 : d3 D3 yx 
删除 一 条 弧 ,请 输入 待 删除 弧 的 顶点 1 顶点 2: D3 d2 上 巡 


2 个 顶点 0 条 边 的 无 向 网 。 顶 点 依次 是 : d2 D3 ( 见 图 7-16) 
G.arcs.adj: 

32767 32767 

32767 32767 全 
cs info 图 7-16 删除 边 d2 一 D3 


顶点 1 顶点 2 该 边 的 信息 : 


对 于 不 同 的 问题 ,图 的 项 点 和 弧 ( 边 ) 的 信息 类 型 是 不 一 样 的 。 为 了 使 bo7-1. cpp 中 的 基 
本 操作 能 够 适用 于 各 种 图 的 顶点 和 弧 ( 边 ) 的 信息 类 型 ,把 图 的 顶点 和 弧 ( 边 ) 的 信息 类 型 从 基 
本 操作 中 抽出 来 ,分 别 用 func7-1. cpp 和 func7-2. cpp 来 定义 图 的 顶点 和 弧 ( 边 ) 的 信息 类 型 
及 对 它们 的 输入 输出 操作 。 当 图 的 顶点 和 弧 ( 边 ) 的 信息 类 型 变化 时 ,只 须 修改 func7-1. cpp 
和 func7-2. cpp 即 可 。 


7.12 邻接 表 


// c7-2.h 图 的 邻接 表 存 储 结构 。 在 教科 书 第 163 页 ( 见 图 7-17) 
提 define MAX_VERTEX_NUM 20 // 最 大 顶点 数 
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enum GraphKind{DG,DN,UDG,UDN}; // {有 向 图 ,有 向 网 ,无 向 图 ,无 向 网 } 
struct ArcNode // 表 结 点 , 存 弧 的 信息 
{ int adjvex; // 该 弧 所 指向 的 顶点 的 位 置 (序号 ) 
InfoType * info; // 该 弧 相关 信息 (包括 网 的 权 值 ) 的 指针 
ArcNode * nextarc; // 指向 下 一 条 弧 的 指针 
}s 
typedef struct // 头 结 点 , 存 顶点 的 信息 
{ VertexType data; // 顶点 信息 
ArcNode * firstarc; // 第 1 个 表 结 点 的 地 址 ,指向 第 1 条 依附 该 顶点 的 弧 的 指针 
}VNode, AdjList[MAX VERTEX NUM]; 
struct ALGraph // 邻接 表 结 构 
{ AdjList vertices; // 头 结 点 (顶点 ) 数 组 
int vexnum,arcnum; // 图 的 当前 顶点 数 和 弧 数 
GraphKind kind; // 图 的 种 类 标志 
1 


ArcNode ArcNode VNode ArcNode 
adjvex | info | nextarc 十 -| | | data| firstarc 二 一 | 
头 结 点 
忆 t -i 家 结 点 和 
1___.l [0] 
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图 7-17 图 的 邻接 表 存 储 结 构 


和 图 的 邻接 矩阵 存储 结构 一 样 , 图 的 邻接 表 存 储 结 构 也 用 VertexType 类 型 存储 有 关 
顶点 的 一 切 信息 。 如 果 图 的 VertexType 类 型 只 包括 一 个 成 员 , 即 顶点 名 称 ,就 可 以 仍然 使 
用 func7-1. cpp 定义 的 顶点 类 型 和 对 这 种 顶点 类 型 的 输入 输出 操作 。 
图 的 邻接 表 存 储 结构 中 的 InfoType 类 型 存储 有 关 弧 ( 边 ) 的 一 切 信息 。 它 和 图 的 邻接 
矩阵 存储 结构 中 的 InfoType 类 型 是 有 区 别 的 。 在 MGraph 中 , 弧 ( 边 ) 信 息 被 分 成 2 部 分 ， 
一 部 分 是 顶点 关系 类 型 VRType, 其 中 根据 不 同情 况 分 别 存储 0.1.c= 和 权 值 ; 另 一 部 分 是 
InfoType 类 型 ,存储 弧 ( 边 ) 除 此 之 外 的 一 切 信息 。 而 在 图 的 邻接 表 存 储 结构 中 ,0、1、 吕 根 
本 不 需要 存储 , 权 值 和 弧 ( 边 ) 的 其 他 信息 一 起 存储 在 InfoType 类 型 中 。 结 构 简单 的 图 ,可 
以 没有 相关 信息 , 则 设 指 向 InfoType 类 型 的 指针 为 空 。 网 ( 带 权 图 ) 的 InfoType 类 型 应 是 
结构 体 ,其 中 至 少 有 权 值 项 。func7-4. cpp 定义 了 仅 有 权 值 项 的 弧 ( 边 ) 的 相关 信息 结构 体 类 
型 和 对 这 种 类 型 的 输入 输出 操作 。 


// func7-4.cpp 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
typedef ;int VRType; // 定义 权 值 类 型 为 整 型 
struct InfoType // 最 简单 的 弧 ( 边 ) 的 相关 信息 类 型 (只 有 权 值 ) 


{ VRTYpe weight; // 权 值 
和 
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void InputArc(InfoType#&arc) // 与 之 配套 的 输入 弧 ( 边 ) 的 相关 信息 的 函数 
{ arc= (InfoType* )malloc(sizeof(InfoType)); // 动态 生成 存放 弧 ( 边 ) 信 息 的 空间 
scanf("%d",&arc ——>weight); 


} 


void OutputArc(InfoType# arc) // 与 之 配套 的 输出 弧 ( 边 ) 的 相关 信息 的 函数 
{ printf(":%d" ,arc —>weight); 


} 


void InputRrcFromFile(FILE# f,InfoType#&arc) // 由 文件 输入 弧 ( 边 ) 的 相关 信息 的 函数 
{ arc= (InfoType * )malloc(sizeof(InfoType)); // 动态 生成 存放 弧 ( 边 ) 信 息 的 空间 
fscanf(f,"%d",&arc- 二 weight); 


图 7-18 和 图 7-19 分 别 是 有 向 图 和 无 向 网 的 邻接 表 存 储 结构 的 示例 。 要 注意 的 是 ,为 
了 提高 效率 ,bo7-2. cpp 中 的 基本 操作 函数 CreateGraph() 产 生 链 表 时 总 是 在 表 头 插入 结 
点 。 所 以 ,对 于 给 定 的 图 ,即使 它 的 顶点 输入 顺序 相同 ,邻接 表 的 存储 结构 也 不 唯一 。 邻 接 
表 的 存储 结构 还 与 弧 或 边 的 输入 顺序 有 关 。 


(a) 有 向 图 (无 相关 信息 ) 


3 
(a) 无 向 网 
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(b) 存储 结构 
图 7-18 有 向 图 的 邻接 表 存 储 示 例 
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(b) 存储 结构 


图 7-19 无 向 网 的 邻接 表 存 储 示 例 


对 于 无 向 的 图 或 网 ,每 条 边 产生 2 个 表 结 点 ,分 别 在 该 边 的 2 个 顶点 的 链表 上 。 由 图 7-19 
可 见 ,2 条 边 的 无 向 网 有 4 个 表 结 点 。 为 简化 ,无 向 网 的 每 条 边 只 动态 生成 1 个 存放 边 的 信 
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息 (目前 只 是 权 值 ) 的 存储 空间 ,由 两 个 结 点 的 指针 共同 指向 。 由 于 邻接 表 存 储 结构 中 的 链 
表 的 长 度 与 该 顶点 的 邻接 出 弧 或 边 数 相等 ,显然 ,从 节约 存储 空间 方面 考虑 ,图 的 邻接 表 存 
储 结 构 适 合 存储 弧 或 边 相 对 较 少 的 稀 玻 图 。 

由 邻接 表 的 存储 结构 可 见 , 头 结 点 数组 的 每 个 项 由 顶点 信息 和 不 带头 结 点 的 单 链 表 组 
合 而 成 。 这 样 ,对 于 单 链 表 的 处 理 , 我 们 就 可 以 利用 不 带头 结 点 的 单 链表 的 基本 操作 (在 
bo2-3. cpp 中 ) 和 扩展 操作 (在 func2-4. cpp 中 ) 来 简化 编程 。 为 了 能 够 利用 这 些 操作 ,需要 
把 在 bo2-3. cpp 和 func2-4. cpp 中 用 到 的 类 型 ElemType、LNode、LinkList 和 邻接 表 的 类 型 
ArcNode 联系 起 来 。c7-2'. h 就 是 根据 c7-2. h 建立 了 这 种 联系 。 


// c7-2'.h 图 的 邻接 表 存 储 结构 (与 单 链 表 的 变量 类 型 建立 联系 ) 

间 define MAX_VERTEX_NUM 20 // 最 大 顶点 数 

enum GraphKind{DG,DN,UDG,UDN}; // (有 向 图 ,有 向 网 ,无 向 图 ,无 向 网 } ElemType 

struct ElemType // 新 增 ( 见 图 7-20) adjvex | info 

{ int adjvex; // 该 弧 所 指向 的 顶点 的 位 置 
InfoType * info; // 该 弧 相关 信息 (包括 网 的 权 值 ) 的 指针 | | 


用 InfoType 
struct ArcNode // 表 结 点 , 存 弧 的 信息 ,修改 ( 见 图 7-21) 图 7-20 ElemType 类 型 
{ ElemType data; // 除 指针 以 外 的 部 分 都 属于 ElenType 


ArcNode x nextarc; // 指向 下 一 条 弧 的 指针 ArcNode 了 _ArcNode__ 
和 data| nextarc] | 
typedef struct // 头 结 点 , 存 顶 点 的 信息 图 7-21 ArcNode 类 型 


{ VertexType data; // 顶点 信息 
ArcNode x firstarc; // 第 1 个 表 结 点 的 地 址 ,指向 第 1 条 依附 该 项 点 的 弧 的 指针 
}VNode, AdjList[MAX_ VERTEX_NUM|; 
struct ALGraph // 邻接 表 结构 
{ adjList vertices; // 头 结 点 (顶点 ) 数 组 
int vexnum,arcnum; // 图 的 当前 顶点 数 和 弧 数 
GraphKind kind; // 图 的 种 类 标志 
上 
间 define LNode ArcNode // 新 增 ,定义 单 链 表 的 结 点 类 型 是 图 的 表 结 点 的 类 型 
间 define next nextarc // 新 增 , 定 义 单 链表 结 点 的 指针 域 是 表 结 点 指向 下 一 条 弧 的 指针 域 
typedef ArcNode * LinkList; // 新 增 ,定义 指向 单 链表 结 点 的 指针 是 指向 图 的 表 结 点 的 指针 


// func2-4. cpp 不 设 头 结 点 的 单 链表 (存储 结构 由 c2-2.h 定义 ) 的 扩展 操作 (1 个 ) ,bo7-2. cpp 用 到 

LinkList Point(LinkList L,ElemType e,Status(# equal) (ElemType,ElemType) ,LinkList &p) 

{ // 查找 表 工 中 与 e 满 足 equal() 条 件 的 结 点 。 如 找到 ,返回 指向 该 结 点 的 指针 ,p 指向 该 结 点 的 前 驱 
// 车 该 结 点 是 首 元 结 点 , 则 p= NULL) 。 如 表 工 中 无 满足 条 件 的 结 点 , 则 返回 NULL,P 无 定义 
int j,i=LocateElem(L,e,equal); // 查找 表 工 中 与 e 满 足 equal() 条 件 的 结 点 
证 (i) // 找到 
{ (i==1) // 是 首 元 结 点 

{ p= NULL; 
return L; 
} 
p=L; // 不 是 首 元 结 点 , 则 p 指向 第 1 个 结 点 
for(j=2;j<i;j++ ) // p 指 向 所 找 结 点 的 前 驱 


p=p-~>next; 
return pnext; // 返回 所 找 结 点 的 指针 
} 
return NULL; // 未 找到 


// bo7-2.cpp 图 的 邻接 表 存 储 (存储 结构 由 c7-21.h 定义 ) 的 基本 操作 (14 个 ) 
提 include"bo2-3.cpp" // 不 带头 结 点 的 单 链表 基本 操作 
提 include"func2-4.cpp" // 不 带头 结 点 的 单 链表 扩展 操作 
int LocateVex(ALGraph G, VertexType u) 
{ // 初始 条 件 : 图 6 存在 ,u 和 G6 中 顶点 有 相同 特征 (顶点 名 称 相同 》 
// 操作 结果 : 若 6G 中 存在 顶点 u, 则 返回 该 顶点 在 图 中 位 置 (序号 ); 否则 返回 -1 
int i; 
for(i=0;i<G. vexnum;+i) // 对 于 所 有 顶点 依次 查找 
if(strcmp(u. name,G. vertices[i].data. name) == 0) // 顶点 与 给 定 的 u 的 顶点 名 称 相同 
return i; // 返回 顶点 序号 
return -1; // 图 6 中 不 存在 与 顶点 u 有 相同 名 称 的 顶点 
} 
void CreateGraph( ALGraph &G) 
{ // 采用 邻接 表 存 储 结构 ,构造 图 或 网 G( 用 一 个 函数 构造 4 种 图 ) 
int ij ,ki 
VertexType v1,v2; // 顶点 类 型 
ElemType e; // 表 结 点 的 元 素 类 型 (存储 弧 的 信息 ) 
char s[3] = " 边 "; 
printf(" 请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 ; 3): "); 
scanf("%d",&G. kind); 
if(G.kind 二 2) // 有 向 
strcpy(s," 弧 "); 
printf(" 请 输入 图 的 顶点 数 , 边 数 :"); 
scanf("%d, %d",&G. vexnum,&G. arcnum); 
printf(" 请 输入 %d 个 顶点 的 值 (名 称 二 %d 个 字符 ): \n" ,G. vexnum,MAX_NAME) ; 
for(i= 0;i<G. vexnum;+#i) // 构造 顶点 向 量 
{ Input(G. vertices[ ij.data); // 输入 顶点 信息 
G. vertices[ i].firstarc = NULL; // 初始 化 与 该 顶点 有 关 的 出 弧 链表 
} 
printf(" 请 输入 %d 条 %s 的 ",G.arcnum,s); 
switch(G. kind) 
{ case DG:printf(" 弧 尾 弧 头 : \n"); // 设 图 没有 弧 ( 边 ) 信 息 
break; 
case DN:printf(" 弧 尾 弧 头 弧 的 信息 : \n"); 
break; 
case UDG: printf(" 顶 点 1 顶点 2: \n"); // 设 图 没有 弧 ( 边 ) 信 息 
break; 
case UDN: printf(" 顶 点 1 顶点 2 边 的 信息 : \n"); 
} 
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for(k = 0;k 一 G.arcnum;+tk) // 构造 相关 弧 链 表 
{ scanf("%s%s",vl.name,v2.name); // 输入 2 顶点 名 称 
= LocateVex(G,v1); // 弧 尾 
j=LocateVex(G,v2); // 弧 头 
e. info = NULL; // 给 待 插 表 结 点 e 赋 值 , 设 图 无 弧 ( 边 ) 信 息 
if(G.kind%2) // 网 
InputArc(e. info); // 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-4. cpp 中 
e.adjvex=j; // 弧 头 
ListInsert(G. vertices[i].firstarc,1,e); 
// 将 e 插 在 第 个 元 素 ( 出 弧 ) 的 表 头 ,在 bo2-3.cpp 中 
if(G.kind 记 = 2) // 无 向 图 或 网 ,产生 第 2 个 表 结 点 ,并 插 在 第 j 个 元 素 ( 入 弧 ) 的 表 头 
{ e.adjvex =i; // e.info 不 变 , 不 必 再 赋值 
ListInsert(G. vertices[j].firstarc,1,e); // 插 在 第 j 个 元 素 的 表 头 ,在 bo2-3. cpp 中 
} 


} 
void CreateFromFile(RLGraph &G,.char# filename) 
{ // 采用 邻接 表 存 储 结构 ,由 文件 构造 图 或 网 G( 用 一 个 函数 构造 4 种 图 ) 
int i,j,k; 
VertexType v1,v2; // 顶点 类 型 
ElemType e; // 表 结 点 的 元 素 类 型 (存储 弧 的 信息 ) 
FILE * f; // 文件 指针 类 型 
f= fopen(filename,"r"); // 以 读 的 方式 打开 数据 文件 ,并 以 王 表示 
fscanf(f,"%d",&G.kind); // 由 文件 输入 G 的 类 型 
fscanf(f,"%d",&G.vexnum); // 由 文件 输入 G 的 顶点 数 
for(i = 0;i<G. vexnum;+ti) // 构造 顶点 向 量 
{ InputFromFile(f,G.vertices[i].data); // 由 文件 输入 顶点 信息 
G. vertices[ i].firstarc = NULL; // 初始 化 与 该 项 点 有 关 的 出 弧 链 表 
} 
fscanf(f,"%d",&G.arcnum); // 由 文件 输入 G 的 弧 ( 边 ) 数 
for(k = 0;k<G.arcnum;+tk) // 构造 相关 弧 链表 
{ fscanf(f,"%s%s",vl.name,v2.name); // 由 文件 输入 2 顶点 名 称 
i= LocateVex(G,v1); // 弧 尾 
j= LocateVex(G,v2); // 弧 头 
e. info= NULL; // 给 待 插 表 结 点 e 赋 值 , 设 图 无 弧 ( 边 ) 信 息 
if(G.kind%2) // 网 
InputArcFromFile(f,e. info); 
// 动态 生成 存储 空间 ,由 文件 输入 弧 的 相关 信息 ,在 func7-4.cpp 中 
e.adjvex= j; // 弧 头 
ListInsert(G. vertices[i].firstarc,l.e); 
// 将 e 插 在 第 主 个 元 素 ( 出 弧 ) 的 表 头 ,在 bo2-3.cpp 中 
if(G.kind 记 = 2) // 无 向 图 或 网 .产生 第 2 个 表 结 点 .并 插 在 第 j 个 元 素 ( 入 弧 ) 的 表 头 
{ e.adjvex = i; // e. info 不 变 , 不 必 再 赋值 
ListInsert(G. vertices[j].firstarc,1,e); // 插 在 第 j 个 元 素 的 表 头 ,在 bo2-3. cpp 中 
} 


} 
fclose(f); // 关闭 数据 文件 
} 
VertexType GetVex(RLGraph G.int v) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6G 中 某 个 顶点 的 序号 。 操 作 结果 : 返回 v 的 值 
if(v 之 = G. vexnum| |v<0) // 图 6 中 不 存在 序号 为 的 顶点 
exit(OVERFLOW) ; 
return G. vertices[v].data; // 返回 该 顶点 的 信息 
} 
Status PutVex(ALGraph &G, VertexType v,VertexType value) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 顶点 。 操 作 结 果 : 对 v 赋 新 值 value 
int k= LocateVex(G,v); // k 为 顶点 v 在 图 G 中 的 序号 
if(k!= -1) //v 是 G 的 顶点 
{ G.vertices[k]. data= value; // 将 新 值 赋 给 顶点 v( 其 序号 为 k) 
return OK; 
} 
return ERROR; // v 不 是 6 的 顶点 
} 
int FirstAdjVex( ALGraph G, int v) 
// 初始 条 件 : 图 6 存在,v 是 6 中 某 个 顶点 的 序号 
// 操作 结果 : 返回 v 的 第 1 个 邻接 顶点 的 序号 。 若 顶点 在 6G 中 没有 邻接 顶点 , 则 返回 -1 
ArcNode * p= G.vertices[v].firstarc; // p 指 向 顶点 v 的 第 1 个 邻接 顶点 
if(p) // 顶点 有 邻接 顶点 
return p ->>data. adjvex; // 返回 v 的 第 1 个 邻接 顶点 的 序号 
else 
return -1; // 顶点 没有 邻接 顶点 
} 
Status equalvex( ElemType a.ElemType b) 
{ // DeleteArc() .DeleteVex() 和 NextadjVex() 要 调用 的 函数 
if(a.adjvex == b.adjvex) // 表 结 点 的 顶 位 置 (序号 ) 相 同 
return OK; 


else 
return ERROR; 


} 
’ 


int NextAdjVex(ALGraph G,int v,int w) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 顶点 的 序号 ,w 是 v 的 邻接 顶点 的 序号 
// 操作 结果 : 返回 v 的 (相对 于 w 的 ) 下 一 个 邻接 顶点 的 序号 。 
// 车 mw 是 v 的 最 后 一 个 邻接 顶点 , 则 返回 -1 
LinkList p,pl; // pl 在 Point() 中 用 作 辅 助 指针 ,Point() 在 func2-4.cpp 中 
ElemType e; // 表 结 点 的 元 素 类 型 (存储 弧 的 信息 ) 
e.adjvex = w; 
p= Point(G. vertices[v].firstarcevequalvex,pl); 
// p 指 向 顶点 的 链表 中 邻接 顶点 为 w 的 结 点 
诗 (!p| |!p- 盖 next) // 未 找到 w 或 w 是 最 后 一 个 邻接 点 


return 一 1; 
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else // p->data.adjvex ==w 
return p -next -data.adjvex; // 返回 v 的 (相对 于 ww 的) 下 一 个 邻接 顶点 的 序号 
} 
void InsertVex(ALGraph &G. VertexType v) 
{ // 初始 条 件 : 图 6 存在 ,v 和 图 中 顶点 有 相同 特征 
// 操作 结果 : 在 图 6 中 增添 新 顶点 v( 不 增添 与 顶点 相关 的 弧 ,留待 Insertarc() 去 做 ) 
G. vertices[G. vexnum]. data = v; // 构造 新 顶点 向 量 
G. vertices[G. vexnum]. firstarc = NULL; // 没有 与 顶点 相关 的 弧 
G.vexnum++; // 图 6 的 顶点 数 加 1 
} 
Status InsertArc(ALGraph &G.VertexType v. VertexType w) 
{ // 初始 条 件 : 图 6 存在 ,v 和 w 是 6G 中 两 个 顶点 
// 操作 结果 : 在 6 中 增添 弧 二 v,w> ,着 6 是 无 向 的 , 则 还 增添 对 称 统 二 w,v 二 
ElemType e; // 表 结 点 的 元 素 类 型 (存储 弧 的 信息 ) 
int i,j; 
char sl[3] = " 边 ",s2[3] = "一 "; // 无 向 的 情况 
if(G.kind<2) // 有 向 
{ strcpy(sl," 弧 "); 
strcpy(s2,"—>"); 
} 
i= LocateVex(G,v); // 弧 尾 或 边 的 序号 
j = LocateVex(G,w); // 弧 头 或 边 的 序号 
if(i<0||j<<0) //v 和 w 至 少 有 1 个 不 是 G 中 的 顶点 
return ERROR; 
G.arcnum++; // 图 G 的 弧 或 边 的 数目 加 1 
e.adjvex= j; // 弧 头 表 结 点 的 值 
e.info=NULL; // 初 值 , 设 图 无 弧 ( 边 ) 信 息 
if(G.kind%2) // 网 
{ printf(" 请 输入 %s%s%ss%s 的 信息 : " ,sl,v.name,s2,w. name); 
InputArc(e. info); // 动态 生成 存储 空间 ,输入 弧 的 相关 信息 ,在 func7-4. cpp 中 
} 
ListInsert(G. vertices[i].firstarc,1,e); // 将 e 插 在 弧 尾 的 表 头 ,在 bo2-3. cpp 中 
if(G.kind>=2) // 无 向 ,生成 另 一 个 表 结 点 
{ e.adjvex =i; // 弧 尾 表 结 点 的 值 ,e. info 不 变 
ListInsert(G. vertices[j].firstarc,1,e); // 将 e 揪 在 弧 头 的 表 头 
} 
return OK; 
} 
Status DeleteArc(ALGraph &G. VertexType v. VertexType w) 
{ // 初始 条 件 : 图 6 存在 ,v 和 ww 是 6 中 两 个 顶点 
// 操作 结果 : 在 6 中 删除 弧 二 vw 一 ,车 6 是 无 向 的 , 则 还 删除 对 称 统 二 wv 二 
int i,j,n; 
ElemType e; // 表 结 点 的 元 素 类 型 (存储 弧 的 信息 ) 
i= LocateVex(G,v); // i 是 顶点 v( 弧 尾 ) 的 序号 
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j= LocateVex(G,w); // j 是 顶点 w( 弧 头 ) 的 序号 
if(i<0||j<0||i==j) // v 和 w 至 少 有 1 个 不 是 6 中 的 顶点 ,或 v 和 w 是 6 中 的 同一 个 顶点 
return ERROR; 
e.adjvex=j; // 弧 头 表 结 点 的 值 
n= LocateElem(G. vertices[i 订 .firstarcvevequalvex); 
// 在 弧 尾 链表 中 找 弧 头 表 结 点 ,将 其 在 链表 中 的 位 序 赋 给 n 
if(n) // 存在 该 弧 
{ ListDelete(G. vertices[ i].firstarc,n,e); // 在 弧 尾 链表 中 删除 弧 头 表 结 点 ,并 用 e 返回 其 值 
G.arcnum--; // 弧 或 边 数 减 1 
if(G.kind%2) // 网 , 设 图 无 弧 ( 边 ) 信 息 
free(e. info); // 释放 动态 生成 的 弧 ( 边 ) 信 息 空间 
证 (G.kind 一 =2) // 无 向 ,删除 对 称 弧 二 w,v 一 
{ e.adjvex= i; // 弧 尾 表 结 点 的 值 
n= LocateElem(G. vertices[j]. firstarcyevequalvex); 
// 在 弧 头 链表 中 找 弧 尾 表 结 点 ,将 其 在 链表 中 的 位 序 赋 给 n 
ListDelete(G. vertices[j]. firstarc,n,e); 
// 在 弧 头 链表 中 删除 弧 尾 表 结 点 ,并 用 e 返回 其 值 
} 
return OK; 
} 
else // 未 找到 待 删除 的 弧 
return ERROR; 
} 
Status DeleteVex( ALGraph &G.VertexType v) 
{ // 初始 条 件 : 图 6 存在 ,v 是 6 中 某 个 顶点 。 操 作 结 果 : 删除 6 中 顶点 v 及 其 相关 的 弧 ( 边 ) 
int i,k; 
LinkList p; // 表 结 点 的 指针 类 型 
k= LocateVex(G,v); // k 为 待 删除 顶点 的 序号 
if(k<0) // 不 是 图 G 的 顶点 
return ERROR; 
for(i=0;i<~G.vexnum;i++ ) 
DeleteArc(G,v,G. vertices[i]. data); // 删除 由 顶点 v 发 出 的 所 有 弧 
if(G.kind<2) // 有 向 
for(i=0;i<~G.vexnum;i++ ) 
DeleteArc(G,G. vertices[i]. data,v); // 删除 发 向 顶点 r 的 所 有 弧 
for(i= 0;i< 一 G.vexnum;i++ ) // 对 于 adjvex 域 二 k 的 结 点 ,其 序号 -1 
{ p=G.vertices[i].firstarc; // p 指 向 弧 结 点 的 单 链 表 
while(p) // 未 到 表 尾 
{ if(p->data.adjvex>k) // adjvex 域 二 k 
p -data.adjvex--; // 序号 - 1( 因 为 前 移 ) 
p=p->next; // p 指 向 下 一 个 结 点 


} 


for(i=k+1;i<~G.vexnum;i++ ) 
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G. vertices[i- 1] = G.vertices[ 订 ; // 顶点 后 面 的 顶点 依次 前 移 
G. vexnum 一 一 ; // 顶点 数 减 1 
return OK; 
} 
void DestroyGraph( ALGraph &G) 
{ // 初始 条 件 : 图 6 存在。 操作 结果 : 销毁 图 6 
int i; 
for(i=G.vexnum -1;i>=0;i 一 ) // 由 大 到 小 逐一 删除 顶点 及 与 其 相关 的 弧 ( 边 ) 
DeleteVex(G,G. vertices[i]. data); 
} 
void Display(ALGraph G) 
{ // 输出 图 的 邻接 矩阵 6 
int i; 
ArcNode * Pi; 
char si[3] = " 边 ",s2[3] = "一 "; // 无 向 的 情况 
if(G.kind 二 2) // 有 向 
{ strcpy(sl," 弧 "); 


strcpy(s2,"—>"); 
} 
switch(G. kind) 
{ case DG:printf(" 有 向 图 \n"); 
break; 
case DN:printf(" 有 向 网 \n"); 
break; 
case UDG:printf(" 无 向 图 \n"); 
break; 
case UDN:printf(" 无 向 网 \n"); 
} 
printf("%d 个 顶点 ,依次 是 : ",G. vexnum); 
for(i= 0;i<G.vexnum;++i) 
Visit(GetVex(G,i)); // 根据 项 点 信息 的 类 型 .访问 第 i 个 顶点 ,在 func7-1. cpp 中 
printf("\n%d 条 %s: \n",G.arcnum,sl1); 
for(i=0;i<~G.vexnum;i++ ) 
{ p=G.vertices[i].firstarc; // p 指 向 序号 为 的 顶点 的 第 1 条 弧 ( 边 ) 
while(p) // p 不 为 空 
{ if(G.kind<=1||i<p->data.adjvex) // 有 向 或 无 向 两 次 中 的 一 次 
{ printf("%s%sS%s",G.vertices[i]. data. name,s2, 
G. vertices[p -二 data. adjvex]. data. name); 
if(G.kind%2) // 网 
OutputArc(p -data. info); // 输出 弧 ( 边 ) 信 息 (包括 权 值 ) ,在 func7-4. cpp 中 
} 
p=Pp->nextarc; // p 指 向 下 一 个 表 结 点 
} 
printf("\n"); 


// main7-2. cpp 检验 bo7-2. cpp 的 主 程序 
间 include"cl.h" 


间 include"func7-1.cpp" // 包括 项 点 信息 类 型 的 定义 及 对 它 的 操作 
间 include"func7-4.cpp" // 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 


间 include"c7-2'.h" // 图 的 邻接 表 存储 结构 (与 单 链表 的 变量 类 型 建立 联系 ) 


间 include"bo7-2.cpp" // 图 的 邻接 表 存 储 结构 的 基本 操作 (14 个 ) 


typedef ALGraph Graph; // 定义 func7-3. cpp 中 Graph 的 类 型 为 ALGraph( 邻 接 表 存 储 结构 ) 


间 include"func7-3.cpp" // 主 函 数 ( 和 main7-1.cpp 共用 ) 


程序 运行 结果 : 


请 依次 选择 有 向 图 ,有 向 网 ,无 向 图 ,无 向 网 : 


请 输入 图 的 顶点 数 , 边 数 : 2,1 x 

请 输入 2 个 顶点 的 值 (名 称 二 9 个 字符 ) : 
al a2y 

请 输入 1 条 弧 的 弧 尾 弧 头 : 

a2aly 

有 向 图 ( 见 图 7-22) 

2 个 顶点 ,依次 是 : al a2 

1 条 弧 : 


a2>al 
插入 新 顶点 ,请 输入 新 顶点 的 值 : a3 

插入 与 新 顶点 有 关 的 弧 ,请 输入 弧 数 : 2 

请 输入 另 一 顶点 的 名 称 : al x 

请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 0 
请 输入 另 一 顶点 的 名 称 : a2 

请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 1 
有 向 图 ( 见 图 7-23) 

3 个 顶点 ,依次 是 : al a2 a3 

3 条 弧 : 


a2>a3 a2—>al 
a3 一 al 

删除 顶点 及 相关 的 弧 ,请 输入 待 删除 顶点 的 名 称 : al x 
有 向 图 ( 见 图 7-24) 

2 个 顶点 ,依次 是 : a2 a3 

1 条 弧 : 


a2->a3 


请 输入 图 的 顶点 数 , 边 数 : 2,1 六 


请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 0 


请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 1 


全 一 全 
图 7-22 有 向 图 


Ep 
人) 
图 7-23 插入 顶点 a3 


图 7-24 删除 顶点 al 
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请 输入 2 个 顶点 的 值 ( 名 称 二 9 个 字符 ) : 

bl bz 必 

请 输入 1 条 弧 的 弧 尾 弧 头 弧 的 信息 : 

bl b23w 

有 向 网 ( 见 图 7-25) 

2 个 顶点 ,依次 是 : bl b2 
1 条 弧 : 图 7-25 有 向 网 
bl>b2: 3 


插入 新 顶点 ,请 输入 新 项 点 的 值 : b3 

插入 与 新 顶点 有 关 的 弧 ,请 输入 弧 数 : 2 

请 输入 另 一 顶点 的 名 称 : bl x 

请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 0 
请 输入 弧 b3-~bl 的 信息 : 5 x 

请 输入 另 一 顶点 的 名 称 : b2 上 妇 

请 输入 另 一 顶点 的 方向 (0: 弧 头 1: 弧 尾 ): 1 
请 输入 弧 b2~>b3 的 信息 : 6 

有 向 网 ( 见 图 7-26) 

3 个 顶点 ,依次 是 : bl b2 b3 

3 条 弧 : 

bl—>b2: 3 

b2—>b3: 6 

b3>bl: 5 

删除 顶点 及 相关 的 弧 ,请 输入 待 删除 顶点 的 名 称 : b2 wj @ 

有 向 网 ( 见 图 7-27) 

2 个 顶点 ,依次 是 : bl b3 

1 条 弧 : (3 


图 7-27 删除 顶点 b2 


图 7-26 插入 顶点 b3 


和 


b3>b1: 5 
请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 2 

请 输入 图 的 顶点 数 , 边 数 : 2,1 六 

请 输入 2 个 顶点 的 值 ( 名 称 一 9 个 字符 ) : 

Se 

请 输入 1 条 边 的 顶点 1 顶点 2: 

C1 c2 a @ 
无 向 图 ( 见 图 7-28) © © 
2 个 顶点 ,依次 是 : cl c2 图 7-28 无 向 图 
1 条 边 : 

ci—c2 


插入 新 项 点 ,请 输入 新 顶点 的 值 : c3 w 
插入 与 新 顶点 有 关 的 弧 , 请 输入 弧 数 : 2 
请 输入 另 一 顶点 的 名 称 : cl 必 

请 输入 另 一 顶点 的 名 称 : c2 w 


无 向 图 ( 见 图 7-29) 

3 个 顶点 ,依次 是 : cl c2 c3 
3 条 边 : 

ci—é63 人 一 c2 

c2 一 c3 


删除 顶点 及 相关 的 弧 ,请 输入 待 删除 顶点 的 名 称 : c3 x 
无 向 图 ( 见 图 7-30) 

2 个 顶点 ,依次 是 : cl c2 

1 条 边 : 


cl 一 c2 


请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 3 
请 输入 图 的 顶点 数 , 边 数 : 2,1 x 

请 输入 2 个 顶点 的 值 (名 称 <9 个 字符 ): 

dl d2 w 

请 输入 1 条 边 的 顶点 1 顶点 2 边 的 信息 : 

dl d2 5 上 

无 向 网 ( 见 图 7-31) 

2 个 顶点 ,依次 是 : dl d2 

1 条 边 : 

di—d2: 5 


插入 新 顶点 ,请 输入 新 项 点 的 值 : d3 
插入 与 新 顶点 有 关 的 弧 ,请 输入 弧 数 : 2 
请 输入 另 一 顶点 的 名 称 : dl 

请 输入 边 d3 一 dl 的 信息 : 4 

请 输入 另 一 顶点 的 名 称 : 
请 输入 边 d3 一 d2 的 信息 : 6 
无 向 网 ( 见 图 7-32) 

3 个 顶点 ,依次 是 : dl d2 d3 
3 条 边 : 


dl 一 d3: 4dl—d2: 5 
d2 一 d3: 6 


ES 
Fl 


删除 项 点 及 相关 的 弧 ,请 输入 待 删除 顶点 的 名 称 : d2 
无 向 网 ( 见 图 7-33) 

2 个 顶点 ,依次 是 : dl d3 

1 条 边 : 

di—d3: 4 


修改 顶点 的 值 ,请 输入 待 修改 顶点 名 称 新 值 : d1 D1 
删除 一 条 弧 ,请 输入 待 删除 弧 的 顶点 1 顶点 2: Dl d3 六 
无 向 网 ( 见 图 7-34) 

2 个 顶点 ,依次 是 : D1 d3 

0 条 边 : 


3 
图 7-29 插入 顶点 c3 


图 7-30 删除 顶点 c3 


图 7-31 无 向 网 


图 7-32 插入 顶点 d3 


® 
图 7-33 删除 顶点 d2 


图 7-34 删除 边 D1 一 d3 
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72 图 的 遍历 


对 图 的 搜索 就 是 对 图 中 顶点 的 遍历 。 图 中 各 顶点 的 关系 比较 复杂 、 一 个 顶点 可 能 有 多 
个 邻接 顶点 ,也 可 能 是 独立 顶点 ( 非 连通 图 )。 为 了 不 重复 地 访问 所 有 顶点 ,需要 为 顶点 向 量 
设立 一 个 访问 标志 数组 visite[L ] ,并 置 其 初 值 为 FALSE( 未 被 访问 )。 遍 历时 只 访问 那些 未 
被 访问 过 的 顶点 , 且 在 访问 后 ,将 其 访问 标志 的 值 改 为 TRUE。 当 所 有 项 点 访问 标志 的 值 
都 为 TRUE, 则 图 已 完成 遍历 。 遍 历 一 般 从 图 的 第 1 个 顶点 开始 。 确 定 遍 历 顶 点 的 顺序 有 
两 个 搜索 原则 : 深度 优先 搜索 和 广度 优先 搜索 。 


72.1 深度 优先 搜索 


// bo7-3.cpp 算法 7.4 一 算法 7.6 
Boolean visite[ MAX_VERTEX_NUM]; // 访问 标志 数组 (全 局 量 ) 
void( x VisitFunc)(VertexType); // 困 数 变量 
void DFS(Graph G,int v) 
{ // 从 第 v 个 顶点 出 发 递归 地 深度 优先 遍历 图 G。 算 法 7.5 
int w; 
visite[v] = TRUE; // 设置 访问 标志 为 TRUE( 已 访问 ) 
VisitFunc(GetVex(G,v)); // 访问 第 v 个 顶点 
for(w= FirstAdjVex(G,v);w 二 = 0;w= NextAdjVex(G,v,w)) // 从 顶点 vv 的 第 1 个 邻接 顶点 w 开 始 
if(1visite[w]) // 邻接 顶点 w 尚未 被 访问 
DFS(G,w); // 对 的 尚未 访问 的 序号 为 w 的 邻接 顶点 递归 调用 DFS( 访 问 w 
} 
void DFSTraverse(Graph G,void(# Visit)(VertexType)) 
{ // 初始 条 件 : 图 6 存在 ,Visit 是 顶点 的 应 用 函数 。 算 法 7.4 
// 操作 结果 : 从 第 1 个 顶点 起 ,深度 优先 遍历 图 6. 并 对 每 个 顶点 调用 函数 Visit 一 次 且 仅 一 次 
int v; 
VisitFunc = Visit; // 使 用 全 局 变量 VisitFunc. 使 DFS 不 必 设 函数 指针 参数 
for(v= 0;v<G. vexnum;v++ ) // 对 图 6 的 所 有 顶点 
visite[v] = FALSE; // 访问 标志 数组 初始 化 (未 被 访问 ) 
for(v=0;v<G.vexnum;v++ ) // 对 图 6 的 所 有 顶点 
if(1visite[v]) // 顶点 尚未 被 访问 
DFS(CG,v); // 对 尚未 访问 的 序号 为 v 的 顶点 调用 DFS 
printf("\n"); 
} 
typedef int QElemType; // 定义 队列 元 素 类 型 为 整 型 (存储 顶点 序号 ) 
间 include"c3-2.h" // 链 队 列 的 结构 ,BFSTraverse() 用 
间 include"bo3-2.cpp" // 链 队列 的 基本 操作 ,BFSTraverse() 用 
void BFSTraverse(Graph G.void(%* Visit)(VertexType)) 
{ // 初始 条 件 : 图 6 存在 ,Visit 是 顶点 的 应 用 函数 。 算 法 7.6 
// 操作 结果 : 从 第 1 个 顶点 起 , 按 广度 优先 非 递 归 遍 历 图 6， 
// 并 对 每 个 顶点 调用 函数 Visit 一 次 且 仅 一 次 


int vv,uyw3; 
LinkQueue 0; // 使 用 辅助 队列 8 和 访问 标志 数组 visite 
for(v= 0;v<<G. vexnum;v++ ) // 对 图 G 的 所 有 顶点 
visite[v] = FALSE; // 访问 标志 数组 初始 化 (未 被 访问 ) 
InitQueue(0); // 初始 化 辅助 队列 0 
for(v = 0;v<<G.vexnum;v++ ) // 对 图 G 的 所 有 顶点 
if(1visite[v]) // 顶点 v 尚 未 被 访问 
{ visite[v] = TRUE; // 设置 访问 标志 为 TRUE( 已 访问 ) 
Visit(GetVex(G,v)); // 访问 顶点 v, 在 func7-1. cpp 中 
Enoueue(Q,v); // v 人 队列 Q 
while( 1QueueEmpty(0)) // 队列 0 不 空 
{ DeQueue(9,u); // 队 头 元 素 出 队 并 置 为 u 
for(w= FirstAdjVex(G,u) ;w= 0;w= NextAdjVex(G,u,w)) // 从 u 的 第 1 个 邻接 顶点 w 起 
if(1visite[w]) // w 为 u 的 尚未 访问 的 邻接 顶点 
{ visite[w] = TRUE; // 设置 访问 标志 为 TRUE( 已 访问 ) 
Visit(GetVex(G,w)); // 访问 顶点 w 
EnQueue(Q,w); // w 人 队列 0 
} 
} 
} 
printf("\n"); 
} 
算法 7.4 和 算法 7.5( 在 bo7-3. cpp 中 ) 是 利用 递归 对 图 进行 深度 优先 搜索 遍历 的 算法 ， 
它 的 主要 思想 是 : 在 访问 一 个 顶点 (假设 为 A) 之 后 ,不 是 马上 依照 顶点 的 存储 顺序 访问 下 
一 个 顶点 (假设 为 B) ,而 是 先 依次 访问 顶点 A 的 所 有 邻接 顶点 。 同 样 , 在 访问 了 顶点 A 的 
第 1 个 邻接 顶点 (假设 为 C) 之 后 ,又 去 先 访问 顶点 C 的 所 有 邻接 顶点 。 所 以 ,对 顶点 B ( 假 
设 它 与 顶点 A 不 连通 ) 的 访问 是 在 对 与 顶点 A 连通 的 所 有 顶点 的 访问 之 后 进行 的 。 所 谓 第 
1 个 邻接 顶点 .第 2 个 邻接 顶点 不 是 由 图 的 拓扑 关系 决定 的 , 它 取决 于 图 的 存储 结构 。 即 使 
是 同一 个 图 ,如 果 它 的 存储 结构 不 同 ,那么 它 的 某 个 顶点 的 第 1 个 邻接 顶点 .第 2 个 邻接 项 
点 也 可 能 不 同 。 关 于 这 一 点 ,将 在 后 面 algo7-1. cpp 中 根据 实例 作 进 一 步 的 说 明 。 


722 广度 优先 搜索 


算法 7. 6( 在 bo7-3. cpp 中 ) 是 对 图 进行 广度 优先 搜索 遍历 的 算法 , 它 的 主要 思想 是 : 先 
访问 图 的 第 1 个 顶点 ,然后 依次 访问 这 个 顶点 的 所 有 邻接 顶点 ,再 依次 访问 这 些 邻 接 顶 点 的 
所 有 邻接 顶点 。 这 需要 建立 1 个 先进 先 出 的 队列 ,依次 将 访问 过 的 顶点 入 队 。 当 前 一 个 顶 
点 的 所 有 邻接 顶点 都 被 访问 了 ,就 出 队 1 个 顶点 ,再 访问 这 个 顶点 的 所 有 邻接 顶点 并 将 这 些 
邻接 顶点 入 队 。 直 至 所 有 顶点 都 被 访问 过 。 

算法 7.4、 算 法 7. 5 和 算法 7. 6 是 基于 基本 操作 的 ,所 以 可 用 于 多 种 图 的 存储 结构 。 
algo7-1. cpp 是 在 图 的 2 种 存储 结构 下 ,调用 算法 7.4、 算 法 7.5 和 算法 7.6, 对 图 进行 深度 
优先 搜索 遍历 和 广度 优先 搜索 遍历 的 程序 。 
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// algo7-1. cpp 检验 2 种 结构 调用 算法 7.4 一 算法 7.6( 深 度 优先 和 广度 优先 ) 搜 索 遍 历 的 程序 
// 如 果 采 用 ALGraph 类 型 为 图 的 存储 结构 ,将 下 行 作 为 注释 
提 define MG // 图 的 存储 结构 为 Graph。 第 3 行 
间 include"cl.h" 
间 include"func7-1.cpp" // 包括 项 点 信息 类 型 的 定义 及 对 它 的 操作 
提 ifdef MG // 图 的 存储 结构 为 MGraph 
# include" func7-2.cpp"// 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
提 include"c7-1.h" // 图 的 数组 (邻接 和 矩阵) 存储 结构 
# include"bo7-1.cpp" // 图 的 数组 (邻接 和 矩阵) 存储 结构 的 基本 操作 
typedef MGraph Graph; // 定义 图 的 存储 结构 为 邻接 矩阵 
间 else // 图 的 存储 结构 为 ALGraph 
间 include"func7-4.cpp" // 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
# include"c7-2'.h" // 图 的 邻接 表 存储 结构 (与 单 链表 的 变量 类 型 建立 联系 ) 
提 include"bo7-2.cpp"// 邻接 表 存 储 结构 的 基本 操作 
typedef ALGraph Graph; // 定义 图 的 存储 结构 为 邻接 表 
间 endif 
间 include"bo7-3.cpp" // 算法 7.4 一 算法 7.6 
void main() 
{ 
Graph g; // 抽象 的 图 类 型 g 
char filename[13]; // 存储 数据 文件 名 (包括 路 径 ) 
printf(" 请 输入 数据 文件 名 :"); 
scanf("%s",filename); 
提 ifdef MG // 图 的 数组 (邻接 矩阵 ?存储 结构 
CreateFromFile(g,filename,0); // 创建 无 相关 信息 的 图 
间 else // 图 的 邻接 表 存 储 结 构 
CreateFromFile(g,filename); // 创建 无 相关 信息 的 图 
和 endif 
printf(" 深 度 优先 搜索 遍历 的 结果 : \n"); 
DFSTraverse(g,Visit); 
printf(" 广 度 优先 搜 索 遍历 的 结果 : \n"); 
BFSTraverse(g,Visit); 
} 


图 7-35 数据 文件 f7-1. txt 
数据 文件 f7-1. txt 的 内 容 ( 图 7-35 是 其 所 表示 的 无 向 图 ) 所 表示 的 无 向 图 


2 

8 
abcdefgh 
14 

ab 

ac 

ae 

af 

ag 

ah 


bd 
be 
bh 
cg 
ch 
dh 
ef 


fg 
数据 文件 {7-2. txt 所 表示 的 无 向 图 与 17-1. txt 的 一 样 ,也 如 图 7-35 所 示 。 只 是 边 的 输 


入 顺序 不 同 。 
数据 文件 f7-2. txt 的 内 容 : 


2 
8 
abcdefgh 
14 
fg 
ef 
dh 
ch 
cg 
bh 
be 
bd 
ah 
ag 
af 
ae 
ac 
ab 


程序 运行 结果 : 


请 输入 数据 文件 名 : f7-1.txt 必 
深度 优先 搜索 遍历 的 结果 : 
abdhcgfe 

广度 优先 搜索 遍历 的 结果 : 
abcefghd 


如 果 用 数据 文件 f7-2. txt 取代 f7-1. txt, 程 序 运 行 结果 也 是 一 样 的 。 因 为 两 文件 创建 
的 邻接 矩阵 是 一 样 的 。 

如 果 将 algo7-1. cpp 的 第 3 行 宏 定 义 “# define MG” 作 为 注释 行 , 则 采用 了 邻接 表 存 储 
结构 。 程 序 运行 结果 : 
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请 输入 数据 文件 名 : £7-1. txt yx 
深度 优先 搜索 遍历 的 结果 : 
ahdbefgc 

广度 优先 搜索 遍历 的 结果 : 
ahgfecbd 


如 果 用 数据 文件 f7-2. txt 取代 {7-1. txt, 程 序 运行 结果 : 


请 输入 数据 文件 名 : £7-2. txt w 
深度 优先 搜索 遍历 的 结果 : 
abdhcgfe 

广度 优先 搜索 遍历 的 结果 : 
abcefghd 


注意 到 两 数据 文件 产生 的 搜索 遍历 结果 是 不 同 的 。 原 因 是 ,虽然 两 文件 创建 的 图 的 拓 
扑 结构 是 一 样 的 ,但 由 于 邻接 表 存 储 结构 中 边 或 弧 是 以 链表 形式 存储 的 , 且 边 或 弧 总 是 插 在 
表 头 。 当 边 或 弧 的 输入 顺序 不 同时 ,所 创建 的 邻接 表 是 不 一 样 的 , 故 搜索 的 顺序 也 会 不 同 。 
{7-1. txt 创建 的 邻接 表 如 图 7-36 所 示 ( 略 去 相关 信息 指针 域 ,是 为 直观 ,用 顶点 名 称 代替 顶 
点 序号 ); f7-2. txt 创建 的 邻接 表 如 图 7-37 所 示 。 当 然 ,对 于 任 一 种 图 的 存储 结构 ,如 果 顶 
点 的 输入 顺序 不 同 , 搜 索 的 顺序 也 不 同 。 


[0 | a | 十 = [el 于 = 于 =-[el 于 =-[e =|b[NUuLL 
[| b -ih 才 =~[e =|d =|alNULL 
[2]| |=[h] j=[s[ =[alNULd 
B]| d |={h] ~[b[NULL 
[|e [=[f| =[b| -~[alNULU 
| 人 | 十 = 四 于 =~[e[ =[alNuLU 
器 | g [4+=[f[ =[e[ =[alNULU 
四 | [lal [el 于 -tb 于 -alNuo 
[19] 

[二 

14 

UDa 


图 7-36 根据 数据 文件 {7-1. txt 所 产生 的 邻接 表 


图 有 2 个 基本 操作 : FirstAdjVex(G,v) 和 NextAdjVex(G,v,w)。FirstAdjVex(G,v) 
返回 图 G 中 序号 为 v 的 顶点 的 第 1 个 邻接 顶点 的 序号 。NextAdjVex(G,v,w) 比 
FirstAdjVex(G,v) 多 了 1 个 形 参 w, 它 返回 图 G 中 序号 为 v 的 顶点 的 所 有 邻接 顶点 中 排 在 
序号 为 w 的 邻接 顶点 后 面 的 那个 邻接 顶点 的 序号 。 

在 邻接 和 矩阵 存储 结构 中 ,FirstAdjVex(G,v) 返 回 邻 接 和 矩阵 G. arcs. adj 中 序号 为 v 的 顶 
点 所 对 应 的 行 的 第 1 个 值 为 1( 图 ) 或 权 值 ( 网 ) 的 顶点 的 序号 。 以 f7-1. txt 所 表示 的 无 向 图 
(如 图 7-35 所 示 , 设 为 图 G) 为 例 ,FirstAdjVex(G,0)( 在 bo7-1. cpp 中 ) 返 回 a 的 第 1 个 邻接 顶 


a 一 b +=[e =|e| 二 =[f| 十 =|g| 十 =[hINULD 
| b [=[al |=[ol =[el =[tINULL 
Qe |+=[al =[s[ [hINULd 
BI| d | 十 -十 -Nu 
[| e | 十 -la 十 -十 -Nu 
加 | f | 十 = 于-[e[ 寺 -lgNuo 
中 | g [+a =[e[ [rN 
中 [na | 寸 -加 于 -加 于- 了 -Nuo 
[19] 

| 

L214 

upg| 


图 7-37 根据 数据 文件 [7-2. txt 所 产生 的 邻接 表 


点 上 b 的 序号 1; FirstAdjVex(G,4) 返 回 e 的 第 1 个 邻接 顶点 a 的 序号 0。NextAdjVex(G,v,w) 
返回 邻接 矩阵 G. arcs. adj 中 序号 为 v 的 顶点 所 对 应 的 行 的 序号 为 w 那 列 后 面 的 第 1 个 值 为 1 
(图 ) 或 权 值 (网 ) 的 顶点 的 序号 。 仍 以 f7-1. txt 所 表示 的 图 G 为 例 , NextAdjVex(G,0,2) (在 
bo7-1. cpp 中 ) 返 回 第 1 行 (a 行 ) 排 在 第 3 列 (c 列 ) 后 面 的 第 1 个 值 为 1 的 顶点 e 的 序号 4。 
由 这 样 的 定义 ,我 们 可 以 推 知 ,algo7-1. cpp( 采 用 邻接 矩阵 存储 结构 ) 调 用 算法 7.4 和 算 
法 7.5 对 图 G 深度 优先 搜索 遍历 的 过 程 : 首先 访问 G 的 第 1 个 顶点 a; 接 下 来 访问 a 的 第 
1 个 邻接 顶点 b; 再 准备 访问 b 的 第 1 个 邻接 顶点 a, 但 a 已 被 访问 过 , 则 不 再 访问 a, 转 而 访 
问 b 排 在 a 后 的 邻接 顶点 d; 再 准备 访问 d 的 第 1 个 邻接 顶点 b, 由 于 同样 的 原因 , 转 而 访 
问 b 排 在 d 后 的 邻接 项 点 h; 再 访问 h 的 第 1 个 未 被 访问 的 邻接 顶点 c、e 的 第 1 个 未 被 访 
问 的 邻接 顶点 g、g 的 第 1 个 未 被 访问 的 邻接 顶点 ff 的 第 1 个 未 被 访问 的 邻接 顶点 e。。 遍 
历 结束 ,其 顺序 与 程序 运行 结果 相同 。 

algo7-1. cpp( 采 用 邻接 矩阵 存储 结构 ) 调 用 算法 7. 6 对 图 G 广度 优先 搜索 遍历 的 过 程 ， 
首先 访问 G 的 第 1 个 顶点 a, 将 a 入 队 , 在 队 不 空 的 情况 下 ,出 队 元 素 a, 依 次 访问 a 的 所 有 
邻接 顶点 bc.e.f、.g.h, 并 将 其 人 队 ; 出 队 b, 访 问 b 的 邻接 顶点 4d。 遍历 结束 ,其 顺序 与 程 
序 运行 结果 相同 。 

在 邻接 表 存 储 结构 中 ,FirstAdjVex(G,v) 返 回 图 G 中 序号 为 v 的 顶点 的 firstarc 成 员 
所 指向 的 结 点 的 序号 。NextAdVex(G,v,w) 返 回 图 G 中 序号 为 v 的 顶点 的 firstarc 成 员 
作为 头 指针 的 链表 中 排 在 序号 为 w 的 邻接 顶点 后 面 的 那个 邻接 顶点 的 序号 。 以 {7-1. txt 
创建 的 无 向 图 存储 结构 (如 图 7-36 所 示 , 设 为 图 G) 为 例 ,FirstAdjVex(G,0)( 在 bo7-2. cpp 
中 ) 返 回 a 的 第 1 个 邻接 顶点 h 的 序号 7。NextAdjVex(G,0,2) (在 bo7-2. cpp 中 ) 返 回 顶点 
a 的 firstarc 链表 中 顶点 c 的 直接 后 继 顶 点 b 的 序号 1。 

algo7-2. cpp 将 算法 7.4、 算 法 7.5 和 算法 7.6 做 了 两 点 修改 : 

(1) 在 函数 DFS() 中 不 使 用 全 局 变量 VisitFunc, 设 置 了 函数 指针 参数 void(* Visit) 
(VertexType) ,这 使 得 DFS() 的 形 参 多 了 1 个 ; 
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(2) 将 算法 改 为 仅 适 用 于 邻接 表 存 储 结构 ,这 样 就 可 以 直接 用 表 结 点 的 指针 p, 从 顶点 
的 firstarc 成 员 出 发 寻找 其 邻接 顶点 。 用 p 二 G. vertices[vj. firstarc 和 p 二 p 一 next 代替 
FirstAdjVex() 和 NextAdjVex() 的 作用 。 这 样 做 效率 高 直观、 更 好 理解 ,但 仅 适用 于 邻接 
表 存 储 结构 。 


// algo7-2.cpp 邻接 表 存 储 结构 的 深度 优先 和 广度 优先 搜索 遍历 
间 include"c1.h" 
间 include"func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 
# include" func7-4.cpp" // 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
提 include"c7-2'.h" // 图 的 邻接 表 存 储 结 构 ( 与 单 链 表 的 变量 类 型 建立 联系 ) 
间 include"bo7-2.cpp"// 图 的 邻接 表 存 储 结 构 的 基本 操作 
Boolean visited[MAX_VERTEX_NUM]; // 访问 标志 数组 (全 局 量 ) 
void DFS(ALGraph G, int v,void( * Visit)(VertexType)) 
{ // 从 第 v 个 顶点 出 发 递归 地 深度 优先 遍历 图 6。 修 改 算法 7.5, 仅 适用 于 邻接 表 存 储 结构 
ArcNode * p; // p 指 向 表 结 点 
visited[v] = TRUE; // 设置 访问 标志 为 TRUE( 已 访问 ) 
Visit(G. vertices[v]. data) ; // 访问 第 v 个 顶点 
for(pP = G. vertices[v].firstarc;p;p=p- 二 next) // p 依 次 指向 v 的 邻接 顶点 
if(1visited[p -二 data.adjvex]) // 如 果 该 邻接 顶点 尚未 被 访问 
DFS(G,p -二 data.adjvex,Visit); // 对 v 的 尚未 访问 的 邻接 点 递归 调用 DFS 


} 
void DFSTraverse( ALGraph G,void( * Visit)(VertexType)) 
{ // 对 图 6 作 深 度 优先 遍历 。DES 设 函 数 指针 参数 .修改 算法 7.4, 仅 适用 于 邻接 表 存 储 结构 
int v; 
for(v= 0;v 一 G.vexnumiv++ ) // 对 于 所 有 顶点 
visited[v] = FALSE; // 访问 标志 数组 初始 化 , 置 初 值 为 未 被 访问 
for(v= 0;v<G. vexnum;v++ ) // 如 果 是 连通 图 ,只 v=0 就 遍历 全 图 
if(1visited[v]) // v 尚 未 被 访问 
DFS(G,v,Visit); // 对 v 调 用 DFS 
printf("\n"); 
} 
typedef int QElemType; // 定义 队列 元 素 类 型 为 整 型 (存储 顶点 序号 ) 
间 include"c3-2.h" // 链 队列 的 结构 .BFSTraverse() 用 
# include"bo3-2. cpp" // 链 队列 的 基本 操作 ,BFSTraverse() 用 
void BFSTraverse(ALGraph G,void(# Visit)(VertexType)) // 修改 算法 7.6, 仅 适用 于 邻接 表 结 构 
{ // 按 广度 优先 非 递归 遍历 图 6。 使 用 辅助 队列 8 和 访问 标志 数组 visited 
int vu; 
ArcNode * p; // 表 结 点 指针 类 型 
LinkQueue 0; // 链 队 列 类 型 
for(v= 0;v<G.vexnum;+tv) // 对 于 所 有 顶点 
visited[v] = FALSE; // 置 初 值 为 未 被 访问 
InitQueue(0); // 初始 化 辅助 队列 0 
for(v = 0;v 一 G. vexnum;v++ ) // 如 果 是 连通 图 ,只 v=0 就 遍历 全 图 
if(1visited[v]) // v 尚未 被 访问 
{ visited[v] = TRUE; // 设 v 为 已 被 访问 


Visit(G. vertices[v]. data); // 访问 v 
Enoueue(Q,v); // 人 队列 0 
while(!OueueFmpty(0)) // 队列 0 不 空 
{ DeQueue(9,u); // 队 头 元 素 出 队 并 赋 给 u 
for(p = G. vertices[u].firstarc;p;p=Pp- 二 next) // p 依次 指向 u 的 邻接 顶点 
计 (!visited[p -二 data.adjvex]) // u 的 邻接 顶点 尚未 被 访问 
{ visited[p -二 data.adjvex] = TRUE; // 设 该 邻接 顶点 为 已 被 访问 
Visit(G. vertices[p -二 data.adjvex].data); // 访问 该 邻接 顶点 
Enoueue(0,p -二 data.adjvex); // 入 队 该 邻接 顶点 序号 
} 


} 

printf("\n"); 

} 

void main() 

{ 
ALGraph g; 
char filename[13]; // 存储 数据 文件 名 (包括 路 径 ) 
printf(" 请 输入 数据 文件 名 : "); 
scanf("%s",filename); 
CreateFromFile(g,filename); // 利用 数据 文件 创建 无 相关 信息 的 图 
printf(" 深 度 优先 搜索 遍历 的 结果 : \n"); 
DFSTraverse(g,Visit); 
printf(" 广 度 优先 搜索 遍历 的 结果 : \n"); 
BFSTraverse(g,Visit); 


1 
上 


程序 运行 结果 : 

请 输入 数据 文件 名 : £7-1. txt x 
深度 优先 搜索 遍历 的 结果 : 
ahdbefgc 


广度 优先 搜索 遍历 的 结果 : 
ahgfecbd 


对 比 可 见 ,algo7-2. cpp 程序 运行 结果 与 algo7-1. cpp 在 邻接 表 存 储 结构 下 的 运行 结果 
是 一 样 的 。 因 为 虽然 使 用 的 语句 不 同 ,但 算法 是 一 样 的 ,数据 文件 也 是 同样 的 。 


73 图 的 连通 性 问题 
731 无 向 图 的 连通 分 量 和 生成 树 


具有 mn 个 顶点 的 无 向 连通 图 至 少 有 n 一 1 条 边 ,如 果 只 有 n 一 1 条 边 , 则 不 会 形成 环 ,这 
样 的 图 称 为 “生成 树 ”。 连 通 图 可 通过 遍历 来 构造 生成 树 , 非 连通 图 的 每 个 连通 分 量 可 构造 
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一 棵 生成 树 ,整个 非 连通 图 构造 为 生成 森林 。algo7-3. cpp 调用 算法 7.7 和 算法 7. 8 ,将 无 向 
图 构造 为 生成 森林 ,并 以 孩子 -兄弟 二 又 链表 存储 之 。 


// algo7-3.cpp 调用 算法 7.7 和 算法 7.8 
间 include"cl.h" 
间 include"func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 
间 include"func7-4.cpp" // 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
typedef VertexTYpe TElemType; // 定义 树 的 元 素 类 型 为 图 的 顶点 类 型 
并 include"c6-4.h" // 孩子 -兄弟 二 叉 链 表 存 储 结构 
# include"bo6-6. cpp" // 孩子 -兄弟 二 叉 链 表 存 储 结构 的 先 根 遍 历 操 作 
间 include"c7-2'.h" // 图 的 邻接 表 存 储 结构 (与 单 链表 的 变量 类 型 建立 联系 ) 
Boolean visited[MAX_VERTEX_NUM]; // 访问 标志 数组 (全 局 量 ) 
间 include"bo7-2.cpp"”// 图 的 邻接 表 的 基本 操作 
typedef ALGraph Graph; // 定义 图 的 存储 结构 为 邻接 表 
void DFSTree(Graph G, int v,CSTree &T) 
{ // 从 第 v 个 顶点 出 发 深度 优先 遍历 图 6, 建 立 以 T 为 根 的 生成 树 。 算 法 7.8 
Boolean first = TRUE; // 树 T 还 没有 第 1 个 孩子 结 点 的 标志 
int w; 
CSTree p,q; // 孩子 -兄弟 二 叉 链 表 结 点 的 指针 类 型 
visited[v] = TRUE; // 顶点 v 已 被 访问 的 标志 
for(w= FirsthdjVex(G,v);w 二 = 0;w= NextAdjVex(G,v,w)) // w 依 次 为 v 的 邻接 顶点 
if(1visited[w]) // 顶点 w 尚 未 被 访问 
{ p= (CSTree)malloc(sizeof(CSNode)); // 分 配 孩子 结 点 给 p 
p -data = GetVex(G,w); // 将 顶点 w 的 值 赋 给 孩子 结 点 的 data 域 
p- 二 firstchild= NULL; // 孩子 结 点 的 firstchild 域 和 nextsibling 域 赋 空 
P -二 nextsibling= NULL; 
证 (first) // 顶点 w 是 顶点 v 的 第 1 个 未 被 访问 的 邻接 顶点 
{ 了- 二 firstchild=p; // 顶点 w 是 根 的 第 1 个 孩子 结 点 
first = FALSE; // 树 T 有 第 1 个 孩子 结 点 的 标志 
} 
else // 顶点 w 是 顶点 v 的 其 他 未 被 访问 的 邻接 顶点 
qnextsibling = p; // 是 上 一 邻接 顶点 的 兄弟 姐妹 结 点 
// for 循环 的 第 1 次 不 通过 此 处 ,以 后 q 已 赋值 
q=pi // q 指 向 p 所 指 结 点 
DFSTree(G,w,q); // 从 第 w 个 顶点 出 发 深度 优先 遍历 图 6, 建 立 子 生成 树 q 


} 
void DFSForest(Graph G.CSTree &T) 
{ // 建立 无 向 图 G 的 深度 优先 生成 森林 的 (最 左 ) 孩 子 ( 下 一 个 ) 兄 弟 链表 T。 算 法 7.7 
CSTree p,q; // 孩子 -兄弟 二 叉 链 表 结 点 的 指针 类 型 
int v; 
T= NULL; // 初始 化 生成 森林 的 根 结 点 为 空 
for(v = 0;v<G.vexnum;+tv) // 对 于 所 有 顶点 


visited[v] = FALSE; // 赋 初 什 
for(v = 0;v 一 G. vexnum;+tv) // 对 所 有 顶点 v 

if(1visited[v]) // 第 个 顶点 不 曾 被 访问 

{ // 第 个 顶点 为 新 的 生成 树 的 根 结 点 
p= (CSTree)malloc(sizeof(CSNode)); // 动态 生成 根 结 点 
pdata = GetVex(G,v); // 给 根 结 点 赋值 
p -之 firstchild= NULL; // 结 点 的 firstchild 域 和 nextsibling 域 赋 空 
p -nextsibling = NULL; // 以 下 将 p 所 指 结 点 插 到 树 了 中 
iE(1T) // p 所 指 结 点 是 第 1 棵 生成 树 T 的 根 结 点 

T=p; // 了 指向 p 所 指 结 点 

else // p 是 其 他 生成 树 的 根 (前 一 棵 树 根 的 “兄弟 ”) 


qq- 二 nextsibling= p; // for 循环 的 第 1 次 ,T= NULL, 不 通过 此 处 ,以 后 q 已 由 下 名 赋值 


q=p; // q 指 示 当 前 生成 树 的 根 
DFSTree(G,v,p); // 建立 以 p 为 根 的 生成 树 


} 
void main( ) 
{ 
Graph g; 
CSTree t; 
printf(" 请 选择 无 向 图 \n"); 
CreateGraph(g); // 构造 无 向 图 g 
Display(g); // 输出 无 向 图 9 
DFSForest(g,t); // 建立 无 向 图 g 的 深度 优先 生成 森林 的 孩子 -兄弟 链表 上 
printf(" 先 序 遍 历 生成 森林 : \n"); 
PreOrderTraverse(t,Visit); // 先 序 遍历 生成 森林 的 孩子 -兄弟 链表 七 
printf("\n"); 
} 


程序 运行 结果 (以 教科 书 中 图 7. 3(a) 的 G3 为 例 ): 


请 选择 无 向 图 
请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 2 


请 输入 图 的 顶点 数 , 边 数 : 13,13 x ( 见 图 7-38) 和 
请 输入 13 个 顶点 的 值 (名 称 <9 个 字符 ) : 
ABCDEFGHIJKLMY 

请 输入 13 条 边 的 顶点 1 顶点 2: 

有 Be 

Aacy (BD Q (DD) 
eS Ng 
有 EL 

BM 


© 
| 
© 


DE 
GH 


图 7-38 非 连通 无 向 图 
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5 六 让 0]| A wl 十 =jF| mC| lBINULL 
可 Me 1]| B | lM IAINULL 
LM 2]| C | -~lA|INULL 
无 向 图 ( 见 图 7-39) 3]| D | 十 -IEINULL 
13 个 顶点 ,依次 是 : ABCDEFGHIJKLM [| E | 十 =[DINULL 
13 条 边 : 引 | FE | 十 =AINULL 
A—LA—FA—CA—B 6| G | 十 -= 必 填 = 盯 填 -Nu 
B_M min =|K| 十 =|G|NULL 
8]| 1 |-~GINULL 
DE [| 1 ~M 二 一 LINULL 
0o| K | 十 = 电 才 -Nuc 
mi ~M =|!| =|A| NULU 
G—K G 一 I G—H 
[| M += -|| [BINULU 
H—K 
J—M J—L 
09| | 
13 
IL—M 13 
UDG| 
先 序 遍 历 生 成 森林 :( 见 图 7-40) 
图 7-39 根据 输入 产生 的 邻接 表 
ALMJBFCDEGKHI 


以 上 所 输入 的 图 的 信息 产生 的 邻接 表 如 图 7-39 所 示 , 仍 略 去 相关 信息 指针 域 , 并 用 项 
点 名 称 代替 顶点 位 置 。 调 用 算法 7.7 产生 的 生成 森林 如 图 7-40 所 示 , 此 生成 森林 以 孩子 - 
兄弟 二 又 链表 存储 的 结构 如 图 7-41 所 示 。 


图 7-40 生成 森林 图 7-41 生成 森林 以 孩子 -兄弟 
二 又 链表 存储 的 结构 


算法 7.7 和 算法 7.8 采用 了 抽象 的 图 的 存储 类 型 Graph, 参 考 algo7-1. cpp, 很 容易 将 
algo7-3. cpp 改 为 在 邻接 矩阵 存储 结构 下 的 应 用 。 


732 最 小 生成 树 


// algo7-4.cpp 实现 算法 7.9 的 程序 

间 include"c1.h" 

提 include"func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 

间 include"func7-2.cpp" // 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
并 include"c7-1.h" // 图 的 数组 (邻接 和 矩阵) 存储 结构 

并 include"bo7-1.cpp"// 图 的 数组 (邻接 矩阵 ?存储 结构 的 基本 操作 


minside 

ed 人 EEC 和 42) [0] | adjvex | lowcost 
{ // 记录 从 顶点 集 0 到 V-0 的 代价 最 小 的 边 的 辅助 数组 定义 [1] 

int adjvex; // 顶点 集 0 中 到 该 点 为 最 小 权 值 的 那个 顶点 的 序号 [2] 

VRType lowcost; // 那个 顶点 到 该 点 的 权 值 (最 小 权 值 ) 
}minside[ MAX_VERTEX_NUM]; 
int minimum(minside SZ,MGraph G) [25] 
{ // 求 SZ. lowcost 的 最 小 正 值 ,并 返回 其 在 Sz 中 的 序号 

int i=0,j,k,min; 图 7-42 minside 类 型 

while(1SZ[ i]. lowcost) // 找 第 1 个 值 不 为 0 的 SZ[i].1lowcost 的 序号 

Ea 


min = SZ[i]. lowcost; // min 标记 第 1 个 不 为 0 的 值 
k=i; // kk 标记 该 值 的 序号 
for(j=i+1;j< 过 6G. vexnum;j++ ) // 继续 向 后 找 
if£(SZ[j]. lowcost>0&&SZ[j]. lowcost<min) // 找到 新 的 更 小 的 正 值 
{ min = SZ[j]. lowcost; // min 标记 此 正 值 
k=j; //k 标 记 此 正 值 的 序号 
} 
return k; // 返回 当前 最 小 正 值 在 Sz 中 的 序号 
} 
void MiniSpanTree PRIM(MGraph G.VertexType u) 
{ // 用 普 里 姆 算法 从 顶点 出 发 构造 网 6 的 最 小 生成 树 T 了 ,输出 了 的 各 条 边 。 算 法 7.9 
int i,j,k; 
minside closedge; 
k= LocateVex(G,u); // 顶点 的 序号 
for(j = 0;j 一 6G. vexnum;++j) // 辅助 数组 初始 化 
{ closedge[j].adjvex=k; // 顶点 u 的 序号 赋 给 closedge[j].adjvex 
closedge[ j]. lowcost = G.arcs[k][j].adj; // 顶点 u 到 该 点 的 权 值 
} 
closedge[k]. lowcost = 0; // 初始 ,U0= {u}。U 中 的 顶点 到 集合 0 的 权 值 为 0 
printf(" 最 小 代价 生成 树 的 各 条 边 为 \n"); 
for(i=1;i<G.vexnum;+ti) // 选择 其 余 6.vexnum 一 1 个 顶点 (i 仅 计数 ) 
{ k= minimum(closedge,6); // 求 出 最 小 生成 树 了 的 下 一 个 结 点 : 第 顶点 
printf("(%s— %s)\n",G.vexs[closedge[k|.adjvex]. name,G. vexs[k |]. name); 
// 输出 最 小 生成 树 了 的 边 
closedge[k]. lowcost = 0; // 第 k 顶 点 并 人 U0U 集 
for(j= 0;j<—G. vexnum;++j) 
if(G.arcs[k][j].adj 二 closedge[j].lowcost) // 新 顶点 并 和 人 U0U 集 后 重新 选择 最 小 边 
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{ closedge[j].adjvex =k; 
closedge[j]. lowcost = G.arcs[k][j].adj; 


} 
void main( ) 
{ 
MGraph g; 
char filename[13]; // 存储 数据 文件 名 (包括 路 径 ) 
printf(" 请 输入 数据 文件 名 : ")， 
scanf("%s",filename); 
CreateFromFile(g,filename,0); // 创建 无 相关 信息 的 网 
Display(g); // 输出 无 向 网 g 
MiniSpanTree PRIM(g,g. vexs[0]); 
// 用 普 里 姆 算法 从 第 1 个 顶点 出 发 输出 g 的 最 小 生成 树 的 各 条 边 
} 


数据 文件 [7-3. txt 的 内 容 ( 图 7-43 是 其 所 表示 的 无 向 网 ): 


3 

6 

Vi V2 V3 V4 V5 V6 
10 

V1 V2 6 

V1V3 1 

ViVv45 

V2 V3 5 

V2V53 


V3 V45 图 7-43 数据 文件 {7-3. txt 


V3 V56 所 表示 的 无 向 网 
V3 v6 4 


V4V6 2 
V5 V6 6 


程序 运行 结果 (以 教科 书 图 7. 16 为 例 ) : 


请 输入 数据 文件 名 :£7-3. txt 
6 个 顶点 10 条 边 的 无 向 网 。 顶 点 依次 是 : V1 V2 V3 V4 V5 V6 ( 见 图 7-43) 


G.arcs.adj: 
32767 6 1 5 32767 32767 
6 32767 5 32767 3 32767 
1 5 32767 3 6 4 
5 32767 5 32767 32767 2 
32767 3 6 32767 32767 6 


32767 32767 4 2 6 32767 


G.arcs. info: 

顶点 1 顶点 2 该 边 的 信息 : 
最 小 代价 生成 树 的 各 条 边 为 
(V1 -V3) 

(V3- V6) 

(v6— V4) 

(V3— V2) 

(只 = 由) 


图 7-44 是 以 上 程序 运行 的 说 明 , 显 示 了 算法 7. 9( 普 里 姆 算法 ) 求 最 小 生成 树 的 过 程 。 
首先 , 主 程序 构造 了 图 7-43 所 示 的 无 向 网 。 然 后 ,调用 MiniSpanTree_PRIM() ,由 顶点 V 
始 , 求 该 网 的 最 小 生成 树 。 最 小 生成 树 项 点 集 U 最 初 只 有 V1, 其 中 用 到 了 辅助 数组 
closedge[ ]。closedge[ij. lowcost 是 U 中 的 顶点 到 顶点 i 的 最 小 权 值 。 若 顶点 i 属于 最 小 
生成 树 , 则 closedge[i]. lowcost 二 0。closedge[1i. adjvex 是 最 小 生成 树 顶点 集 U 中 到 顶点 i 
为 最 小 权 值 的 那个 顶点 的 序号 。 图 7-44(a) 显 示 了 closedge[ ] 的 初 态 ( 为 直观 起 见 ,图 中 用 
顶点 名 称 代替 顶点 序号 )。 这 时 U 中 只 有 V1, 所 以 closedge[i]. adjvex 都 是 Vl,closedge 
[ 训 . lowcost 是 V1 到 顶点 i 的 权 值 。closedge[0j. lowcost= 二 0, 说 明 V1 已 属于 UT 了 。 在 
closedge[ ]. lowcost 中 找 最 小 正 数 ,closedge[2]. lowcost 二 1, 是 最 小 正 数 。 令 k= 二 2, 将 V3 
并 入 U( 令 closedge[2]. lowcost 二 0) ,输出 边 (Vl-V3)。 因 为 V3 到 V2、V5 和 V6 的 权 值 小 于 
V1 到 它们 的 权 值 , 故 将 它们 的 closedge[ ]. lowcost 替换 为 V3 到 它们 的 权 值 ; 将 它们 的 
closedge[ ]. adjvex 替换 为 V3, 如 图 7-44(b) 所 示 。 重 复 这 个 过 程 ,依次 如 图 7-44(c)、(d) 和 
(e) 所 示 。 最 后 ,closedge[ ]. adjvex 包含 了 最 小 生成 树 中 每 一 条 边 的 信息 。 


四 四 
yD CD、， 


g B00 DO 


\4 6/ 
四 四 ©® 
closedge closedge 
[ol[vl 0 [OIvi 0 | [0] 
[vl 6 [lvals [1] 
k=2—[2]|vi| 1 [Qlvi 0 [2 
Blvl 5 Bllvl 5 | k=3—[3] 
[Iv = [4]|lval 6 | [4] 
GS]lvil ~ k=5—[5][v3| 4 [5] 
(a) U={V1} (b) U={V1, V3} (ce) U={V1, V3, V6}  (d)U={VI,V3, V6,V4}  (e)U={V1, V3, 


V6, V4, V2} 


图 7-44 运行 algo7-4. cpp 过 程 


// algo7-5.cpp 克 鲁 斯 卡尔 算法 求 无 向 连通 网 的 最 小 生成 树 的 程序 

提 include"c1.h" 

间 include"func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 

间 include"func7-2.cpp" // 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
间 include"c7-1.h" // 图 的 数组 (邻接 矩阵 ) 存 储 结 构 


211 


212 


数据 结构 算法 解析 


# include"bo7-1.cpp" // 图 的 数组 (邻接 矩阵 ) 存 储 结构 的 基本 操作 
struct side // ”图 的 边 信息 存储 结构 
{ int a,b; // 边 的 2 顶点 的 序号 
VRType weight; // 边 的 权 值 
}s 
void Kruskal( MGraph G) 
{ // 克 鲁 斯 卡尔 算法 求 无 向 连通 网 G 的 最 小 生成 树 
int set[MAX VERTEX NUM],senumber = 0,sb,i,j,k; 
side se[ MAX_VERTEX_NUM x (MAX_VERTEX_NUM -1)/2]; // 存储 边 信 息 的 一 维 数组 
for(i=0;i<G.vexnum;++ i) // 查找 所 有 的 边 , 并 根据 权 值 升序 插 到 se 中 
for(j=i+1;j<<6.vexnum;++j) // 无 向 网 ,只 在 上 三 角 查 找 
if(G.arcs[i][j].adj 过 INFINITY) // 顶点 [i][ 让 之 间 有 边 
{ k= senumber -1; // k 指 向 se 的 最 后 一 条 边 
while(k>=0) //， k 仍 指向 se 的 边 
if(se[k].weight>6G.arcs[i][j].adj) 
{ //k 所 指 边 的 权 值 大 于 刚 找到 的 边 的 权 值 
se[k+1]= se[k]; // k 所 指 的 边 向 后 移 
kk 一; // 指向 前 一 条 边 
} 
else // 上 所 指 边 的 权 值 不 大 于 刚 找到 的 边 的 权 值 
break; // 跳出 while 循环 
se[k+1].a=i; // 将 刚 找到 的 边 的 信息 按 权 值 升序 插入 se 
se[k+1].b=j; 
se[k+ 1].weight = G.arcs[il[j].adj; 
senumber ++; // se 的 边 数 + 1 
} 
printf("i se[i].a se[i].b se[i].weight\n"); 
for(i=0;i<~senumber;i++) 
printf("%d %4d %7d %9d\n",i,se[il].a,se[i].b,se[i].weight); 
for(i=0;i<G.vexnum;i++ ) // 对 于 所 有 顶点 
set[i] =i; // 设置 初 态 , 各 顶点 分 别 属于 各 个 集合 
printf(" 最 小 代价 生成 树 的 各 条 边 为 \n"); 
j=0; // j 指示 se 当前 要 并 和 人 最 小 生成 树 的 边 的 序号 , 初 值 为 0 
k=0; // 指示 当前 构成 最 小 生成 树 的 边 数 
while(k 二 G. vexnum- 1) // 最 小 生成 树 应 有 G. vexnum -1 条 边 
{ 站 (set[se[j].a]!1= set[se[].b]) // j 所 指 边 的 2 顶点 不 属于 同一 个 集合 
{ printf("(% s—%s)\n",G.vexs[se[j].a].name,G. vexs[ se[j].b].name); // 输出 该 边 
sb = set[se[j].b]; // 将 该 边 的 顶点 se[j].b 当前 所 在 的 集合 赋 给 sb 
for(i=0;i<G.vexnum;i++ ) // 对 于 所 有 顶点 
if(set[i] == sb) // 与 顶点 se[j].b 在 同一 个 集合 中 
set[i] = set[se[j].a]; // 将 此 顶点 并 入 顶点 se[j].a 所 在 的 集合 中 
k++; // 当前 构成 最 小 生成 树 的 边 数 + 1 
} 
j++; // j 指 示 se 下 一 条 要 并 人 最 小 生成 树 的 边 的 序号 
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} 
void main() 
{ 
MGraph g; 
char filename[13]; // 存储 数据 文件 名 (包括 路 径 ) 
printf(" 请 输入 数据 文件 名 :"); 
scanf("%s",filename); 
CreateFromFile(g,filename,0); // 创建 无 相关 信息 的 网 
Display(g); // 输出 无 向 网 g 
Kruskal(g); // 用 克 鲁 斯 卡尔 算法 输出 g 的 最 小 生成 树 的 各 条 边 
} 


程序 运行 结果 (以 教科 书 图 7. 16 为 例 ) : 


请 输入 数据 文件 名 : £7-3. txt x 
6 个 顶点 10 条 边 的 无 向 网 。 顶 点 依次 是 : V1 V2 V3 V4 V5 V6 ( 见 图 7-43) 


G.arcs.adj: 
32767 6 1 5 32767 32767 
6 32767 5 32767 3 32767 
1 5 32767 5 6 4 
3 32767 3 32767 32767 2 
32767 3 6 32767 32767 6 
32767 32767 4 2 6 32767 


G.arcs. info: 


顶点 1 顶点 2 该 边 的 信息 : 


i se[il.a se[i].b se[i].weight 
0 0 2 1 
家 3 5 2 
2 3 4 3 
3 2 5 4 
4 0 3 5 
5 1 2 5 
6 2 3 5 
江 0 1 6 
8 2 4 6 
9 4 5 6 
最 小 代价 生成 树 的 各 条 边 为 

(V1 -V3) 

(v4— V6) 

(V2— V5) 

(V3- Vv6) 


(V2— V3) 
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图 7-45 是 以 上 程序 运行 的 说 明 , 显 示 了 克 和 鲁 斯 卡尔 算法 求 最 小 生成 树 的 过 程 。 首 先 ， 
主 程序 构造 了 图 7-43 所 示 的 无 向 网 。 然 后 ,调用 Kruskal() , 求 该 网 的 最 小 生成 树 。 其 中 用 
到 了 2 个 辅助 数组 se[] 和 set[]。se[] 按 照 边 的 权 值 升序 存储 边 的 信息 ,具体 内 容 见 程序 运 
行 结果 。set[ 让 表示 第 i 个 顶点 所 在 的 集合 。 设 初 态 set[ 订 =i,6 个 顶点 分 属于 6 个 集合 ,如 
图 7-45(a) 所 示 。 由 se[0]( 权 值 最 小 的 边 ) 开 始 ,将 边 逐 条 加 入 到 最 小 生成 树 中 。 加 入 边 的 
原则 有 2 个 : 


oA 人 


Pt 
Bt a "a pe 


set set set set 
[0]| 0 [| 0 [| 0 [0 | 0 of [| 1 
| [| 1 [1 了 [| 1 [1] [| 1 
加 | 2 D| 0 lo | 0 加 D| 1 
[| 3 B]| 3 出 DB]| 3 DB] 6]| 1 | 
[中 | 4 [4]| 4 [| 4 [| 1 [Wy [| 1 
[5]|5 [5]| 5 [5]|3| [5]| 3 [5]|0 [5]|1 
(a) 无 边 (b) 加 入 边 se[0] (c) 加 入 边 se[1] ”(d) 加 入 边 se[2] ”(e) 加 入 边 se[3] (f) 加 入 边 se[5] 


图 7-45 运行 algo7-5. cpp 过 程 


(1) 边 的 权 值 尽量 小 ,这 一 点 是 通过 将 se[ 按照 边 的 权 值 升序 存储 , 且 由 se[0] 开 始 
边 加 入 实现 的 ，; 

(2) 所 加 入 的 边 ,其 2 顶点 必须 不 在 同一 个 集合 中 。 

根据 这 个 原则 ,首先 将 se[0j, 即 边 (V1 一 V3) 加 入 到 最 小 生成 树 中 ,将 V1 和 V3 并 到 1 个 
集合 中 。 方 法 是 将 V3 的 集合 set[2] 赋 值 为 set[0]( V1 的 集合 ) ,并 输出 该 边 ,如 图 7-45(b) 所 
示 。 用 此 方法 依次 将 se[1] .se[2] 和 se[3] 三 条 边 加 入 到 最 小 生成 树 中 ,如 图 7-45(c)、(d) 
和 (e) 所 示 。 这 时 ,考察 se[4], 即 边 (V1 一 V4) ,虽然 它 是 当前 权 值 最 小 的 边 ,但 不 满足 原则 
(2) ,set[0] 二 set[3j 二 0, 说 明 se[4] 的 2 顶点 Vl 和 V4 在 同一 个 集合 中 。 舍 弃 se[4], 考 察 
下 一 条 边 se[5j], 即 边 (V2 一 V3)。se[5] 满 足 加 入 边 的 原则 ,将 seL5] 加 入 到 最 小 生成 树 中 ， 
如 图 7-45(f) 所 示 。 具 有 6 个 顶点 的 无 向 网 ,加 入 了 5 条 满足 原则 (1) 和 原则 (2) 的 边 , 构 成 
了 最 小 生成 树 。 所 构成 的 最 小 生成 树 和 普 里 姆 算法 的 一 样 。 


733 关节 点 和 重 连通 分 量 


// algo7-6.cpp 实现 算法 7.10 和 算法 7.11 的 程序 

间 include"cl.h" 

间 include"func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 

间 include"func7-4.cpp" // 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 

# include"c7-2'.h" // 图 的 邻接 表 存储 结构 (与 单 链表 的 变量 类 型 建立 联系 ) 
提 include"bo7-2.cpp" // 图 的 邻接 表 存储 结构 的 基本 操作 
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int count ,lowcount =1; // 全 局 量 count 对 访问 顺序 计数 ,lowcount 对 求 得 low 值 的 顺序 计数 
int low[MAX VERTEX NUM|,lowOrder[MAX VERTEX NUM|; 

// 全 局 数组 ,low[ ] 存 顶点 的 low 值 ,lowOrder 存 顶 点 求 得 low 值 的 顺序 

int visited[ MAX_VERTEX_NUM]; // 访问 标志 数组 (全 局 量 ) 

void DFSArticul(ALGraph G, int v0) 

{ // 从 第 vo 个 顶点 出 发 深度 优先 遍历 图 6, 查 找 并 输出 关节 点 。 算 法 7.11 

int min,w; 

ArcNode *p; 

visited[v0] = min = +tcount; // v0 是 第 count 个 访问 的 顶点 ,min 的 初 值 为 vo 的 访问 顺序 
for(p = G. vertices[v0].firstarc;p;p=p- 二 nextarc) // 依次 对 v0 的 每 个 邻接 顶点 检查 


} 


{ 


} 


w=p->data.adjvex; // w 为 v0 的 邻接 顶点 位 置 
if(visited[w] == 0) // w 未曾 访问 ,是 v0 的 孩子 
{ DFSArticul(G,w); 
// 从 第 w 个 顶点 出 发 深度 优先 遍历 图 6, 查 找 并 输出 关节 点 。 返 回 前 求 得 low[w] 
证 (lon[wj 一 min) // 如 果 vo 的 孩子 结 点 w 的 low[ 小 ,这 说 明 孩 子 结 点 还 与 其 他 结 点 (祖先 ) 相 邻 
min= low[w]; // 取 min 值 为 孩子 结 点 的 low[], 则 vo 不 是 关节 点 
else if(low[w] 二 = visited[v0]) // v0 的 孩子 结 点 w 只 与 v0 相连 , 则 vo 是 关节 点 
printf("%d %s\n" ,v0,G. vertices[v0]. data. name); // 输出 关节 点 v0 
} 
else if(visited[w]<<min) // w 已 访问 , 则 w 是 vo 在 生成 树 上 的 祖先 , 它 的 访问 顺序 必 小 于 min 
min = visited[w]; // 故 取 min 为 visited[w] 


lowLv0] = min; // v0 的 low[] 值 为 三 者 中 的 最 小 值 
lowOrder[v0] = lowcount ++; 


// 记录 v0 求 得 low[] 值 的 顺序 ,总 是 在 返回 主 调 函 数 之 前 求 得 low[]j。 新 增 


void FindArticul (ALGraph G) 
{ // 连通 图 6 以 邻接 表 作 存储 结构 ,查找 并 输出 6 上 全 部 关节 点 。 全 局 量 count 对 访问 计数 。 算 法 7.10 
int i,v; 
ArcNode *p; 
count = 1; // 访问 顺序 
visited[0] = count; // 设 定 邻 接 表 上 0 号 顶点 为 生成 树 的 根 ,第 1 个 被 访问 
for(i=1;i 过 6. vexnum;+ti) // 对 于 其 余 顶 点 


visited[i] = 0; // 其 余 顶 点 尚未 访问 , 设 初 值 为 0 


p=G.vertices[0].firstarc; // p 指 向 根 结 点 的 第 1 个 邻接 顶点 

v=p-data.adjvex; // v 是 根 结 点 的 第 1 个 邻接 顶点 的 序号 

DEFSArticul(G,v); // 从 第 v 顶 点 出 发 深度 优先 查找 关节 点 

(count 过 G. vexnum) // 由 根 结 点 的 第 1 个 邻接 顶点 深度 优先 遍历 6, 访 问 的 顶点 数 少 于 6 的 顶点 数 


{ 


// 说 明生 成 树 的 根 有 至 少 两 棵 子 树 , 则 根 是 关节 点 
printf("%dg%sNn" ,0,G.vertices[0].data.name); // 根 是 关节 点 ,输出 根 
while(p -二 nextarc) // 根 有 下 一 个 邻接 点 
{ p=p->nextarc; // p 指 向 根 的 下 一 个 邻接 点 

v=p->data.adjvex; 

if(visited[v]== 0) // 此 邻接 点 未 被 访问 
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DFSArticul(G,v); // 从 此 顶点 出 发 深度 优先 查找 关节 点 


} 
void main() 
{ 
int i; 
ALGraph g; 
char filename[ 13]; // 存储 数据 文件 名 (包括 路 径 ) 
printf(" 请 输入 数据 文件 名 :"); 
scanf("%s",filename); 
CreateFromFile(g,filename); // 由 文件 构造 无 向 图 g 
Display(g); // 输出 无 向 图 g 
printf(" 输 出 关节 点 : \n"); 
FindArticul(g); // 求 连通 图 g 的 关节 点 
printf("i G. vertices[i]. data visited[i] low[i] low0rder[i\n"); // 输出 辅助 变量 
for(i=0;i<G.vexnum;++i) 
printf("%2d %9s %14d %8d %8d\n",i,g.vertices[i]. data. name, 
visited[i],low[i],lowOrder[i]); 
} 


数据 文件 {7-4. txt 的 内 容 ( 图 7-46 是 其 所 表示 的 无 向 图 ): 


2 
13 
ABCDEFGHIJKLM 
17 
AB 
AC 
及 了 
AL 
BC 
BD 
BG 
BH 
BM 
DE 
GH 
GI 
GK 
HK 
可 工 
JM 
LM 


图 7-46 数据 文件 {7-4. txt 所 
表示 的 连通 无 向 图 
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程序 运行 结果 (以 教科 书 中 图 7. 19 和 图 7. 20 为 例 ) : 
请 输入 数据 文件 名 : f7-4.tzxt 妇 
无 向 图 ( 见 图 7-47) 
13 个 顶点 ,依次 是 : ABCDEFGHIJKLM 
17 条 边 : 0| A (=[i[ -|| =[c| +~[s[NULU 
A—L A—E A—C A—B | -~M] -加 -加 -DANOO 
日 一 其 B 一 攻 DB 一 G B 一 D B 一 人 2 C = |B = [|A[NULL 
3]| D | 十-[E[ 了 -BINULL 
D 一 了 
4]| E | 十 =|plNuLL 
5]| F | 十 =|AINULL 
a 6 G [lk| += lt] lINuLL 
鼎 二 衣 7]| H | 十 = 区 | 才 =~|Ga 才 盖 BINULL 
g]| 1 | 十 =|aNuc 
ee 9]| 1 M =~[LINULL 
no| K |+=[H[ =oINuLL 
ee mE EE 
[| M | 十 = 上 寺 = 加 十-=BINurr 
输出 关节 点 ， | 
6G 09| | 
入 | 
3D [| 
1B D9 
ea 图 7-47 根据 输入 产生 的 邻接 表 
六 G.vertices[il].data visited[i] low[ i] lowOrder[ i] 
0 A 1 0 0 (未 求 A 的 low[]) 
i B 5 1 9 
2 C 12 8 
3 D 10 5 7 
4 E 狂 10 6 
5 F 13 1 该 
6 G 8 5 3 
) H 6 5 5 
8 I 9 8 多 
9 J 4 2 1 
10 了 5 4 
名 L 2 1 11 
地 M 3 10 


运行 algo7-6. cpp 构造 的 深度 优先 生成 树 如 图 7-48 所 示 。 图 7-48 和 图 7-46 的 拓扑 结 
构 是 一 样 的 。5 条 用 虚线 表示 的 边 是 构造 深度 优先 生成 树 多 余 的 边 , 它 们 是 连接 祖先 的 回 
边 。 如 果 一 个 结 点 不 仅 有 连 向 双亲 的 边 , 还 有 连 向 祖先 的 回 边 。 则 对 这 个 结 点 来 说 , 它 的 双 
亲 结 点 不 是 关节 点 。 如 图 7-48 中 的 结 点 B, 它 有 连 向 双亲 结 点 M 的 边 , 还 有 连 向 祖先 结 点 
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A 的 边 。 这样, 如 果 删 除 结 点 M,B 仍然 与 图 的 其 他 部 分 连通 
( 重 连通 ) 。 而 图 7-48 中 的 结 点 IT, 它 只 有 连 向 双亲 结 点 G 的 
边 。 一旦 结 点 G 被 删除 , 结 点 工 就 与 图 的 其 他 部 分 不 连通 ,也 
就 是 一 个 连通 分 量 被 分 割 成 了 多 个 连通 分 量 。 结 点 G 被 称 为 
关节 点 。 

如 何 确定 关节 点 ? 算法 7. 10 和 算法 7. 11 的 思路 是 这 样 
的 : 首先 在 深度 优先 遍历 图 时 ,不 仅 标注 某 顶 点 是 否 被 访问 ， 
还 标注 它 的 访问 顺序 。visited[ ] 不 再 只 是 FALSE 和 TRUE， 
而 是 1 一 顶点 数 。 由 于 采用 深度 优先 遍历 , 某 结 点 的 祖先 被 访 
问 的 顺序 必 先 于 该 结 点 被 访问 的 顺序 。 仍 以 图 7-48 为 例 , 由 图 7-48 深度 优先 生成 树 
第 1 个 结 点 A 深度 优先 遍历 的 顺序 是 : A、L、M、J、B、…… , 增 
加 1 个 辅助 数组 low[] ,对 顶点 v, 定 义 low[v]=min(Cvisited[v],low[w],visitedLk])。 其 
中 ww 和 k 分 别 是 v 的 孩子 和 由 回 边 相 连 的 祖先 。 由 算法 7. 11 可 知 ,low[] 是 在 递归 调用 返 
回 之 前 求 得 的 。 所 以 , 求 得 low[] 的 顺序 是 : …… BM Ly ,也 就 是 说 ,孩子 的 low[] 是 
先 于 双亲 的 low[D] 而 获得 的 。 这 可 由 程序 运行 结果 中 的 lowOrder[] 看 出 (增加 辅助 数组 
lowOrder[] 的 目的 就 是 帮助 分 析 求 得 low[] 的 顺序 ) 。 


如 果 顶 点 v 有 孩子 w, 且 有 lowLwj 宇 visited[vj, 则 顶点 v 必 为 关节 点 。 下 面 分 析 几 种 
可 能 存在 的 情况 : 


(1) 如 果 顶 点 v 有 通过 回 边 相 连 的 祖先 k, 则 low[v]j=visitedLk]( 祖 先 顶点 k 被 访问 的 
顺序 ) 。 同 时 k 也 是 v 的 双亲 u 的 祖先 或 双亲 , 故 有 low[v]= visited[k] 一 visited[u]( 结 点 
祖先 或 双亲 必 先 于 该 结 点 被 访问 ) 。 不 满足 判定 关节 点 的 公式 , 故 u 不 是 v 的 关节 点 。 这 种 
情况 如 图 7-48 中 顶点 了 的 low 吕 = 顶点 A 的 visited[]=1, 其 双亲 M 的 visited[]=3, 故 M 
不 是 也 的 关节 点 。 

(2) 如 果 顶 点 v 没 有 通过 回 边 相连 的 祖先 ,但 有 孩子 w, 而 孩子 顶点 w 有 通过 回 边 相连 的 
祖先 k, 则 low[wj 三 visited[kj, 而 k 也 是 v 的 双亲 u 的 祖先 , 仍 有 visited[k] 近 visitedLu]。 如 
顶点 K 没有 通过 回 边 相连 的 祖先 ,但 有 和 孩子 G, 而 G 有 通过 回 边 相连 的 祖先 B。 顶 点 G 的 
low 吕 等 于 顶点 了 的 visited[] 二 5, 也 等 于 顶点 K 的 low[]。 而 KK 的 双亲 理 的 visited[] 二 6， 
故 HH 不 是 的 关节 点 。 

(3) 如 果 顶 点 v 既 无 孩子 又 无 通过 回 边 相 连 的 祖先 , 则 其 双亲 结 点 u 是 关节 点 。 在 这 
种 情况 下 ,low[v]=visitedLv]( 顶 点 v 被 访问 的 顺序 )。 而 u 被 访问 的 顺序 必定 小 于 v 的 ， 
故 有 low[v]=visitedLv] 之 visitedLuj。 所 以 u 是 v 的 关节 点 。 如 顶点 下 就 是 既 无 孩子 又 无 
通过 回 边 相 连 的 祖先 , 则 其 双亲 结 点 D 是 正 的 关节 点 。 

(4) 如 果 顶 点 v 没有 通过 回 边 相 连 的 祖先 , 虽 有 孩子 顶点 w, 但 w 也 没有 通过 回 边 相连 
的 祖先 , 则 v 的 双亲 结 点 u 是 关节 点 。 在 这 种 情况 下 ,low[Lwj]= visitedLw]( 顶 点 w 被 访问 
的 顺序 )>low[v]=visitedLv]( 顶 点 v 被 访问 的 顺序 )>visited[u] , 故 u 是 v 的 关节 点 。 如 
顶点 D 虽 有 孩子 顶点 下 ,但 下 没有 通过 回 边 相 连 的 祖先 , 则 lowLD]=5=visitedLB]。 故 也 
是 D 的 关节 点 。 

通过 low[w] 三 visited[Lv] 来 判断 连通 图 关节 点 的 方法 不 能 用 于 根 结 点 。 因 为 根 结 点 的 
visited[] 王 1 ,是 最 小 值 。 判 断根 结 点 是 否 为 关节 点 要 看 它 有 几 棵 子 树 ,如 果 超 过 1 棵 , 则 根 
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结 点 就 是 关节 点 。 原 因 是 , 它 的 每 棵 子 树 上 的 结 点 都 和 其 他 子 树 的 结 点 不 相连 。 否 则 在 深 
度 优先 遍历 其 他 子 树 时 ,就 会 遍历 到 ,也 就 不 成 为 根 结 点 的 子 树 了 。 所 以 算法 7. 10 在 深度 
优先 遍历 时 ,不 是 直接 从 根 结 点 遍历 ,而 是 从 根 结 点 的 第 1 个 邻接 顶点 开始 遍历 。 当 遍历 完 
这 个 邻接 顶点 的 生成 子 树 , 若 还 有 顶点 未 被 访问 , 则 说 明 根 结 点 是 关节 点 。 如 图 7-48 所 示 ， 
对 根 结 点 A 的 第 1 棵 子 树 L 遍历 结束 后 ,A 还 有 邻接 点 下 未 被 访问 到 。 说 明 除 根 结 点 A 
之 外 ,L 子 树 上 的 任何 一 个 结 点 都 不 和 下 邻接。 这 样 , 若 根 结 点 A 被 删除 , 原 图 就 会 被 分 割 
成 工 子 树 和 下 两 部 分 。 故 根 结 点 A 是 关节 点 。 

运行 algo7-6. cpp 在 输出 关节 点 时 ,B 被 输出 了 2 次 。 其 原因 是 删除 B 使 连通 图 分 割 成 
3 个 连通 分 量 。 
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741 拓扑 排序 


// func7-5. cpp algo7-7. cpp 和 algo7-8. cpp 要 调用 
void FindInDegree( ALGraph G, int indegree[ |) 
{ // 求 顶点 的 入 度 ,算法 7.12 和 算法 7.13 调用 
int i; 
ArcNode *p; 
for(i=0;i<G. vexnum;i++ ) // 对 于 所 有 顶点 
indegree[i]=0; // 给 顶点 的 人 度 赋 初 值 0 
for(i=0;i<G. vexnum;i++ ) // 对 于 所 有 顶点 
{ p=G.vertices[i].firstarc; // p 指 向 顶点 的 邻接 表 的 头 指针 
while(p) // p 不 空 
{ indegree[p -二 data.adjvexjt+; // 将 pb 所 指 邻 接 顶 点 的 入 度 +1 
p=Pp->nextarc; // p 指 向 下 一 个 邻接 顶点 


// algo7-7.cpp 输出 有 向 图 的 一 个 拓扑 序列 。 实 现 算法 7.12 的 程序 

间 include"cl.h" 

间 include"func7-1. cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 

间 include"func7-4.cpp" // 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 

间 include"c7-2'.h" // 图 的 邻接 表 存 储 结构 (与 单 链 表 的 变量 类 型 建立 联系 ) 
间 include"bo7-2.cpp" // 图 的 邻接 表 存 储 结构 的 基本 操作 

# include" func7-5.cpp" // 求 顶 点 人 度 的 函数 

typedef ;int SElemType; // 定义 栈 元 素 类 型 为 整 型 (存储 顶点 序号 ) 

间 include"c3-1.h" // 顺序 栈 的 存储 结构 
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间 include"bo3-1. cpp"”// 顺序 栈 的 基本 操作 
Status TopologicalSort(ALGraph G) 
{ // 有 向 图 G 采 用 邻接 表 存 储 结构 。 若 6 无 回路 . 则 输出 G 的 顶点 的 一 个 拓扑 序列 并 返回 OK; 
// 否则 返回 ERROR。 算 法 7.12 
int i,k,count = 0; // 已 输出 顶点 数 , 初 值 为 0 
int indegree[MAX_VERTEX_NUM]; // 和 人 度数 组 ,存放 各 顶点 当前 人 度数 
SqStack S; 
ArcNode x*p; 
FindInDegree(G,indegree); // 对 G 的 各 顶点 求人 度 indegree[] ,在 func7-5. cpp 中 
InitStack(S); // 初始 化 零 人 度 顶 点 栈 S 
for(i= 0;i<G. vexnum;+i) // 对 所 有 顶点 
if(1indegree[i]) // 若 其 人 度 为 0 
Push(S,i); // 将 诗人 零 人 度 顶 点 栈 S 
while(1StackEmpty(S)) // 当 零 入 度 顶 点 栈 S 不 空 
{ Pop(S,i); // 出 栈 1 个 零度 顶点 的 序号 ,并 将 其 赋 给 i 
printf("%s",G.vertices[i]. data. name); // 输出 i 号 顶点 
++ count; // 已 输出 顶点 数 +1 
for(p = G. vertices[i].firstarc;pip=p- 二 nextarc) // 对 号 顶点 的 每 个 邻接 顶点 
{ k=p->data.adjvex; // 其 序号 为 k 
if(1( 一 -indegree[k])) // k 的 入 度 减 1, 若 减 为 0, 则 将 k 入 栈 S 
Push(S,k); 


} 
if(count 一 G. vexnum) // 零 人 度 顶点 栈 S 已 空 ,图 6 还 有 顶点 未 输出 
{ printf(" 此 有 向 图 有 回路 \n"); 
return ERROR; 
} 
else 
{ printf(" 为 一 个 拓扑 序列 。\n"); 


return OK; 


} 

void main() 

{ 
ALGraph f; 
printf(" 请 选择 有 向 图 \n"); 
CreateGraph(f); // 构造 有 向 图 上 ,在 bo7-2. cpp 中 
Display(f); // 输出 有 向 图 三, 在 bo7-2. cpp 中 
TopologicalSort(f); // 输出 有 向 图 王 的 工 个 拓扑 序列 


程序 运行 结果 (以 教科 书 图 7. 28 为 例 ) : 
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图 7-51 显示 了 运 


请 选择 有 向 图 


请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 0y ( 见 图 7-49) 


请 输入 图 的 顶点 数 , 边 数 : 6,8 六 


请 输入 6 个 顶点 的 值 (名 称 二 9 个 字符 ) : 


VIiV2V3VA4V5 V6 

请 输入 8 条 弧 的 弧 尾 弧 头 : 
VIiV2r 

VV 

VIiVar 

V3 V2 

V3 V5y 

VA V5 

V6 VA 

V6 V5 y 

有 向 图 ( 见 图 7-50) 

6 个 顶点 ,依次 是 : V1 V2 V3 V4 V5 V6 
8 条 弧 : 

V1->V4 Vi>V3 V1->V2 


V3 一 V5 V3 一 V2 
V4—>V5 


V6>V5 V6—>V4 
V6 V1 V3 V2 V4 V5 为 一 个 拓扑 序列 。 


Dos 
a 
© 


图 7-49 有 向 图 


-vi 村 -Nuc 


|=[vaNuLL) 


|-=[vaNUuLL 


邻接 表 


个 不 同 的 拓扑 序列 。 


林 


Da 
a 


行 algo7-7. cpp 的 过 程 。 其 中 的 S 栈 也 可 用 队列 代替 ,这 样 将 输出 一 


四 G 
indegree S indegree S indegree S Re S ee S indegree S 
[O] 0 [oj| 0 [0| 0 [0] | [0L0 
[| 2 [| 2 [|L1 0] 中 [Lo 
[2]| 1 加 | 1 [2]| 0 [2]| 0 [2]| 0 [2]10 
DB]| 2 BIL1 DB]| 0 DB]| 0 DB]| 0 DB]| 0 
[4]| 3 | 15 [4]| 2 42 || 2 [4]| 1 1 [4]|1 [4]L0 
[Lo Lo [Lo Lo [Lo |3 DG]Lo |L3 [Lo dL3 [5]L0 | L4 
(a) while 循 环 前 。“”(b) 输出 V6 (0) 输出 V1 (d) 输出 V3 (e) 输出 V2 (了) 输出 V4 
图 7-51 运行 algo7-7. cpp 过 程 
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742 关键 路 径 


算法 7. 13 用 到 2 个 辅助 数组 : 事件 (顶点 ) 最 早 发 生 时 间 veL] 和 事件 最 迟 发 生 时 间 vl[]。 
在 algo7-8.cpp 中 ,将 这 2 个 独立 的 .与 顶点 有 关 的 数组 绑 定 到 顶点 信息 中 ,如 func7-6. cpp 
所 示 。 相 比 func7-1. cpp,func7-6. cpp 的 顶点 信息 类 型 多 了 2 个 成 员 ve、vl。 它 们 起 到 了 辅 
助 数组 ve[ 和 vl[ 的 作用 。func7-6. cpp 还 多 了 一 个 对 ve、vl 操作 的 函数 Visitel( ) 。 

算法 7.14 用 到 了 ee、el 两 个 辅助 变量 。ee 表示 活动 ( 弧 ) 的 最 早 开始 时 间 ,el 表示 活动 
的 最 迟 开始 时 间 ( 在 不 影响 工期 的 情况 下 )。 在 algo7-8. cpp 中 ,将 这 2 个 独立 的 、 与 弧 有 关 
的 变量 绑 定 到 弧 信息 中 。 如 func7-7. cpp 所 示 ( 当 然 由 于 ee、el 不 是 数组 ,这 样 做 并 不 是 必 
须 的 ) 。 相 比 func7-4. cpp,func7-7. cpp 的 弧 信息 类 型 多 了 2 个 成 员 ee、el, 还 多 了 一 个 对 
ee .el 操作 的 函数 OutputArcwel() 。 

为 了 清楚 地 表示 一 个 图 ,就 要 表明 图 的 各 顶点 的 所 有 信息 、 每 2 顶点 之 间 的 邻接 关系 
( 弧 ) 的 所 有 信息 。 将 顶点 信息 、 弧 的 信息 及 对 顶点 、 弧 的 操作 从 图 的 基本 操作 中 分 离 出 来 ， 
成 为 一 个 独立 的 部 分 ,就 能 使 基本 操作 适用 于 图 的 项 点、 弧 的 各 种 具体 结构 ,从 而 提高 了 基 
本 操作 函数 的 利用 率 。 

// func7-6.cpp 包括 项 点 信息 类 型 的 定义 及 对 它 的 操作 

间 define MAX_NAME 9 // 顶点 字符 串 的 最 大 长 度 +1 

struct VertexType // 顶点 信息 类 型 

{ char name[ MAX_NAME]; // 顶点 名 称 

int ve,v1; // (顶点 ) 事 件 最 早 发 生 时 间 ,事件 最 迟 发 生 时 间 
Fs 
void Visit(VertexType ver) // 访问 项 点 名 称 的 函数 ,输出 图 要 用 到 


{ printf("%s",ver.name); 


1 
上 


void Input(VertexType &ver) // 输入 顶点 信息 的 函数 .创建 图 要 用 到 
{ scanf("%s" ,ver.name); 


1 


void Visitel(VertexType ver) // 输出 项 点 ve,vl 域 的 函数 

{ printf("% 3d%3d" ,ver.ve,ver. vl); 

} 

void InputFromFile(FILE x f,VertexType &ver) // 从 文件 输入 顶点 信息 的 函数 
{ fscanf(f,"%s" ,ver.name); 


} 


// func7-7.cpp 包括 弧 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
typedef int VRType; // 定义 权 值 类 型 为 整 型 
struct InfoType // 弧 的 相关 信息 类 型 
{ VRTYpe weight; // 权 值 
int ee,el; // (活动 ) 最 早 开始 时 间 ,最 迟 开始 时 间 
}s 
void InputArc(InfoType * &arc) // 动态 生成 弧 的 相关 信息 的 空间 并 输入 权 值 的 函数 ,创建 图 用 到 


{ arc= (InfoType * )malloc(sizeof(InfoType)); // 动态 生成 存放 弧 信息 的 空间 
scanf("%d",&arc 一 weight); // 输入 权 值 

} 

void outputarc(InfoType# arc) // 输出 弧 的 权 值 的 函数 .输出 图 要 用 到 

{ printf(":%d",arc—>weight); 

} 

void OutputArcwel(InfoType# arc) // 输出 弧 的 权 值 .ee 和 el 的 函数 

{ printf("%3d %3d %3d " arc- 二 weight,arc- 二 ee,arc- 二 el); // 输出 弧 的 权 值 .ee 和 el 

} 

void InputRrcFromFile(FILE# f,InfoType#&arc) // 由 文件 输入 弧 ( 边 ) 的 相关 信息 的 函数 

{ arc= (InfoTypex )malloc(sizeof(InfoType)); // 动态 生成 存放 弧 ( 边 ) 信 息 的 空间 
fscanf(f,"%d",&arc — >weight); 


// algo7-8.cpp 求 关键 路 径 。 实 现 算法 7.13、 算 法 7.14 的 程序 

间 include"cl.h" 

提 include"func7-6.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 

# include" func7-7.cpp" // 弧 的 相关 信息 类 型 的 定义 及 对 它 的 操作 

间 include"c7-2'.h" // 图 的 邻接 表 存储 结构 (与 单 链表 的 变量 类 型 建立 联系 ) 

间 include"bo7-2.cpp" // 图 的 邻接 表 存储 结构 的 基本 操作 

间 include"func7-5.cpp" // 求 顶点 人 度 的 函数 

typedef int SElemType; // 定义 栈 元 素 类 型 为 整 型 (存储 顶点 序号 ) 

间 include"c3-1.h" // 顺序 栈 的 存储 结构 

间 include"bo3-1.cpp"”// 顺序 栈 的 基本 操作 

Status TopologicalOrder(ALGraph &G,SqStack &T) 

{ // 有 向 网 G 采 用 邻接 表 存 储 结构 , 求 各 顶点 事件 的 最 早 发 生 时 间 ve( 存 储 在 6 中 )。 修 改 算 法 7.13 
// 了 为 拓扑 序列 顶点 栈 ,S 为 零 人 度 顶 点 栈 。 若 6 无 回路 , 则 用 栈 T 返 回 G 的 一 个 拓扑 序列 ， 
// 且 函 数值 为 OK; 否则 为 ERROR 
int i,k,count = 0; // 已 人 栈 顶点 数 , 初 值 为 0 
int indegree[ MAX_VERTEX_NUM]; // 入 度数 组 ,存放 各 顶点 当前 入 度数 
SqStack S; 

ArcNode # Pi 
FindInDegree(G, indegree); // 对 各 顶点 求人 度 indegree[ ] ,在 func7-5. cpp 中 
InitStack(S); // 初始 化 零 人 度 顶 点 栈 S 
printf(" 拓 扑 序列 : ")， 
for(i= 0;i<G. vexnum;+#i) // 对 所 有 顶点 i 
if(1indegree[i]) // 若 其 人 度 为 0 
Push(S,i); // 将 i 入 零 人 度 顶 点 栈 S 
InitStack(T); // 初始 化 拓扑 序列 顶点 栈 
for(i=0;i<G.vexnum;+ti) // 初始 化 ve = 0( 最 小 值 . 先 假定 每 个 事件 都 不 受 其 他 事件 约束 ) 
G. vertices[i]. data. ve = 0; 
while(1StackEmpty(S)) // 当 零 人 度 顶 点 栈 S 不 空 
{ Pop(S,i); // 从 栈 $s 将 已 拓扑 排序 的 顶点 弹出 .并 赋 给 i 
Visit(G. vertices[i]. data); // 输出 该 顶点 的 名 称 
Push(T,i); // j 号 顶点 和 人道 拓扑 排序 栈 T( 栈 底 元 素 为 拓扑 排序 的 第 1 个 元 素 ) 
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++count; // 对 入 栈 了 的 顶点 计数 
for(p= G.vertices[il].firstarc;p;p=p->nextarc) 
{ // 对 二 号 顶点 的 每 个 邻接 顶点 
Kk=p- 二 data.adjvex; // 其 序号 为 k 
if( 一 indegree[k] == 0) // k 的 和 人 度 减 1, 若 减 为 0, 则 将 k 人 栈 S 
Push(S,k); 
if(G. vertices[il]. data. ve +p->data. info ->weight>6G. vertices[k]. data. ve) 
// 顶点 i 事件 的 最 早 发 生 时 间 + 一 i,k> 的 权 值 二 顶点 k 事 件 的 最 早 发 生 时 间 
G. vertices[k]. data. ve = G. vertices[il]. data. ve +p->data. info —>weight; 
// 顶点 上 事件 的 最 早 发 生 时 间 = 顶点 1 事件 的 最 早 发 生 时 间 + 一 i,k 二 的 权 值 
)} ”// 由 于 i 已 拓扑 有 序 , 故 6G.vertices[i]. data. ve 不 再 改变 
} 
if(count<G. vexnum) 
{ printf(" 此 有 向 网 有 回路 \n"); 
return ERROR; 
} 
else 
return OK; 
} 
Status CriticalPath(ALGraph &G) 
{ // 6 为 有 向 网 ,输出 6 的 各 项 关键 活动 。 修 改 算法 7.14 
SqStack Ti; 
int 1,j,k; 
ArcNode *p; 
if(1TopologicalOrder(G,T)) // 产生 有 向 环 
return ERROR; 
j=G.vertices[0]. data. ve; // j 的 初 值 
for(i=1;i<G.vexnum;i++ ) // 在 所 有 顶点 中 , 找 ve 的 最 大 值 
if(G. vertices[i]. data. ve>j) 
j=G.vertices[i].data.ve; // j=Max(ve) 完成 点 的 最 早 发 生 时 间 
for(i=0;i<G.vexnum;i++ ) // 初始 化 顶点 事件 的 最 迟 发 生 时 间 
G. vertices[i]. data.vl= j; // 为 完成 点 的 最 早 发 生 时 间 ( 最 大 值 ) 
while( 1StackEmpty(T)) // 按 拓 扑 逆 序 求 各 顶点 的 妃 值 
for(Pop(T,j),p=G.vertices[j].firstarc;p;p=p->nextarc) 
{ // 弹出 栈 T 的 元 素 , 赋 给 j,p 指向 顶点 j 的 后 继 事件 (出 弧 ) 顶 点 k， 
// 事件 k 的 最 迟 发 生 时 间 已 确定 (因为 是 逆 拓 扑 排序 
k=p->data.adjvex; // 后 继 事件 顶点 的 序号 
if(G. vertices[k]. data.vl ~- p->data. info ->weight<6. vertices[j]. data. v1) 
// 事件 j 的 最 迟 发 生 时 间 之 其 直接 后 继 事件 k 的 最 迟 发 生 时 间 -一 j,k 二 的 权 值 
G. vertices[j]. data. vl = G. vertices[k]. data. vl ~- p->data. info —>weight; 
// 事件 j 的 最 迟 发 生 时 间 = 事件 k 的 最 迟 发 生 时 间 -一 j,k 二 的 权 值 
}  // 由 于 k 已 逆 拓 扑 有 序 , 故 G. vertices[k]. data.vl 不 再 改变 
printf("\ni ve vi\n"); 
for(i= 0;i<G.vexnum;i++ ) // 对 于 每 个 顶点 
{ printf("%d" ,i); // 输出 序号 


Visitel(G. vertices[i]. data); // 输出 ve,vl 值 .在 func7-6. cpp 中 
if(G. vertices[i]. data. ve == G. vertices[i]. data. v1) 
// 事件 (顶点 ) 的 最 早 发 生 时 间 = 最 迟 发 生 时 间 
printf(" 关键 路 径 经 过 的 顶点 "); 
printf("\n"); 
} 
printf("j k 权 值 ee el\n"); // 以 下 求 ee,el 和 关键 活动 
for(j = 0;j 志 G. vexnum;++j) // 对 于 每 个 顶点 j 
for(p = G. vertices[j].firstarc;p;p = p->nextarc) 
{ // p 依 次 指向 其 邻接 项 点 (直接 后 继 事件 ) 
k=p-data.adjvex; // 邻接 顶点 (直接 后 继 事件 ) 序 号 
p->data. info -二 ee = G.vertices[j|. data. ve; 
// ee( 活 动 二 j,k 二 的 最 早 开 始 时 间 )= (顶点 j) 事 件 最 早 发 生 时 间 
p->data. info ->el=6G.vertices[k]. data.vl - p->data. info ->weight; 
// el( 活 动 二 j,k> 的 最 迟 开始 时 间 ) = (顶点 kx) 事 件 最 迟 发 生 时 间 - 志 j,k 盖 的 权 值 
printf("%s—>%s",G. vertices[j]. data. name,G. vertices[k]. data.name); // 输出 弧 
OutputArcwel(p 一 data. info); // 输出 弧 的 权 值 .ee 和 el, 在 func7-7.cpp 中 
if(p->data. info ->ee==p->data. info ->el) 
// 活动 ( 弧 ) 的 最 早 开 始 时 间 = 活动 的 最 迟 开始 时 间 
printf(" 关 键 活动 "); 
printf("\n"); 
} 
return OK; 
} 
void main() 
{ 
ALGraph h; 
printf(" 请 选择 有 向 网 \n"); 
CreateGraph(h); // 构造 有 向 网 h, 在 bo7-2.cpp 中 
Display(h); // 输出 有 向 网 h, 在 bo7-2.cpp 中 
CriticalPath(h); // 求 h 的 关键 路 径 
} 


程序 运行 结果 (以 教科 书 中 图 7. 30 为 例 ): 


请 选择 有 向 网 

请 输入 图 的 类 型 (有 向 图 : 0 有 向 网 : 1 无 向 图 : 2 无 向 网 : 3): 1 ( 见 图 7-52) 
请 输入 图 的 顶点 数 , 边 数 : 6,8 

请 输入 6 个 顶点 的 值 (名 称 <9 个 字符 ) : 
VLV2V3V4VW VG 

请 输入 8 条 弧 的 弧 尾 弧 头 弧 的 信息 : 
V1L V2 3 好 

WV32y 

V2V42 

V2V53 

V3VA4Y 


图 7-52 有 向 网 
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mW3 纺 

V4V62k 巡 7 

又 WII 上 

有 向 网 ( 见 图 7-53) 

6 个 顶点 ,依次 是 : WV V2 V3 V4 V5 V6 
8 条 弧 : 


Nu 
NuLL] 
NUuLL] 


V2>V5: 3 V2>V4: 2 


V3>V6: 3 V3>V4: 4 
V4>V6: 2 
V5>V6: 1 


拓扑 序列 , V1 V2 V5 V3 V4 V6 
i ve Vl ( 见 图 7-54) 
0 0 0 关键 路 径 经 过 的 顶点 


图 7-53 ”邻接 表 

2 2 2 关键 路 径 经 过 的 顶点 事件 V2 的 最 早 发 生 

3 6 6 关键 路 径 经 过 的 顶点 时 间 为 3， 最 迟 

4 6 7 发 生 时 间 为 4 

5 8 8 关键 路 径 经 过 的 顶点 

j k 权 值 ee el 

WxV3 2 0 0 关键 活动 

Vi>yV 3 0 1 

Vo>v5 3 3 4 

V2>V4 2 3 4 

v3->v6 3 2 5 活动 <V3,V6> 的 最 早 开始 
加。 4 2 2 关键 活动 FA 
V4>V6 2 6 6 关键 活动 

tt 图 7-54 关键 路 径 ( 粗 线 ) 及 各 种 信息 


图 7-53 是 由 输入 产生 的 邻接 表 。 为 直观 和 方便 起 见 , 表 结 点 中 邻接 顶点 的 序号 直接 用 
其 名 称 代替 ,动态 生成 的 权 值 也 直接 写 在 相关 信息 的 指针 域 中 。 

顶点 i 的 事件 最 时 发生 时 间 ve[ 订 取决 于 其 直接 前 驱 事 件 的 发 生 时 间 和 二 者 之 间 活 动 
的 持续 时 间 ( 弧 的 权 值 ) 。 以 图 7-52 为 例 ,V2 事件 的 最 早 发 生 时 间 ve[] 取 决 于 V1 的 ve[] 
和 二 V1,V2 放 的 权 值 3。 即 V2 的 ve[] 等 于 V1 的 ve[] 十 3。 如 果 顶 点 i 有 多 个 直接 前 驱 事 
件 则 ve[ 记 取 它 们 的 最 大 值 ,如 V4 的 ve[] 取 决 于 V2 的 ve[ 十 二 V2,V4 二 的 权 值 2 与 V3 
的 ve[] 十 二 V3,V4 二 的 权 值 4 这 2 者 中 的 大 值 。 没 有 直接 前 驱 事 件 的 顶点 ( 源 点 ,工程 开 
始点 ) ,其 ve[]=0( 是 最 小 值 ) ,如 顶点 V1。 由 于 求 顶点 的 ve[ ] 要 求 其 直接 前 驱 的 ve[ 已 
知 , 故 应 先 对 有 向 网 进行 拓扑 排序 。 排 序 前 设 所 有 顶点 的 ve[] 初 值 王 0( 最 小 值 ) , 当 出 现 较 
大 的 值 , 则 用 这 个 大 值 更 新 ve[ ]。 调 用 TopologicalOrder () 后 ,ve[ ] 如 以 上 程序 运行 结果 所 示 。 

所 谓 事件 最 迟 发 生 时 间 是 指 在 不 影响 工期 的 情况 下 , 某 事 件 可 以 最 迟 发 生 的 时 间 。 顶 
点 i 的 事件 最 迟 发 生 时 间 vi[ 癌 取决 于 其 直接 后 继 事件 的 最 迟 发 生 时 间 和 二 者 之 间 活 动 的 持 
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续 时 间 ( 弧 的 权 值 ) 。 仍 以 图 7-52 为 例 ,V4 事件 的 最 迟 发 生 时 间 vl[] 取 决 于 V6 的 vI[] 和 
过 V4,V6 二 的 权 值 2。 即 V4 的 vl[] 等 于 V6 的 vl[] 一 2。 如 果 顶 点 i 有 多 个 直接 后 继 事 件 
则 vl[ 训 取 最 小 值 。 如 V3 的 v1[] 取 决 于 V4 的 vl[] 一 二 V3,V4 二 的 权 值 4 与 V6 的 
vl[ 一 二 V3,V6 二 的 权 值 3 这 2 者 中 的 小 值 。 没 有 直接 后 继 事件 的 顶点 ( 汇 点 ,工程 完成 
点 ) ,其 vl[]=ve[]( 是 最 大 值 ,已 先期 求 出 ) ,如 顶点 V6。 由 于 求 顶点 的 v1[] 时 ,要 求 其 直接 
后 继 的 vID] 已 知 , 故 应 先 形成 有 向 网 的 逆 拓 扑 序列 。TopologicalOrder() 将 已 拓扑 排序 的 顶 
点 入 栈 工 ,形成 道 拓扑 序列 。 排 序 前 设 所 有 项 点 的 vl[] 初 值 等 于 没有 后 继 的 那个 顶点 的 
vl[]( 最 大 值 ) ,本 例 中 这 个 顶点 是 V6。 当 出 现 较 小 的 值 , 则 用 这 个 小 值 更 新 v1[ ]。 调 用 
CriticalPath() ,vl[] 如 以 上 程序 运行 结果 所 示 。 

车 对 于 顶点 i, 有 ve[ 让 =vI[ 让 , 即 事件 最 早 发 生 时 间 等 于 事件 最 迟 发 生 时 间 。 说 明 为 保 
证 工期 ,事件 (顶点 )i 的 发 生 时 间 不 可 变更 。 如 果 变 小 , 则 前 面 的 活动 (入 统 ) 还 未 完成 ; 如 
果 变 大 , 则 影响 后 继 事件 按时 完成 。 因 此 ,顶点 i 是 关键 路 径 要 经 过 的 点 。 如 以 上 程序 运行 
结果 所 示 ,V1、V3、V4 和 V6 是 关键 路 径 要 经 过 的 顶点 。 但 仅 根据 这 些 顶 点 ,还 不 能 确定 关 
键 路 径 。 如 图 7-52 中 ,虽然 V3、V4 和 V6 是 关键 路 径 要 经 过 的 顶点 ,但 弧 <V3,V4 二 、 
<V3,V6> 和 二 V4,V6 二 中 哪个 是 关键 路 径 还 不 清楚 。 

对 于 一 个 活动 ( 弧 ) 过 j,k>, 它 的 最 早 开始 时 间 ee 等 于 它 的 前 端 事件 (顶点 j) 的 最 时 发 
生 时 间 ve[j]; 它 的 最 迟 开始 时 间 el 等 于 它 的 后 端 事件 (顶点 k) 的 最 迟 发 生 时 间 vlLk] 减 去 
二 j,k 二 的 权 值 ; 如 果 活动 二 j,k 二 的 ee 一 el, 那 么 这 个 活动 的 开始 时 间 就 没有 变动 的 余地 ， 
它 就 是 整个 关键 路 径 的 一 部 分 。 求 得 ve[] 和 vlD] 后 ,对 于 每 一 个 弧 二 j,k> ,判断 它 的 ee 是 
否 等 于 el, 可 求 出 所 有 关键 路 径 。 图 7-54 中 用 粗 箭头 表示 关键 路 径 。 


75 最 短路 径 


75.1 从 某 个 源 点 到 其 余 各 顶点 的 最 短路 径 


// algo7-9.cpp 实现 算法 7.15 的 程序 。 迪 杰 斯 特 拉 算法 的 实现 
间 include"cl.h" 
间 include"func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 
间 include"func7-2.cpp" // 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
间 include"c7-1.h" // 图 的 数组 (邻接 矩阵) 存储 结构 
间 include"bo7-1.cpp" // 图 的 数组 (邻接 矩阵 ) 存 储 结构 的 基本 操作 
typedef Status PathMatrix[MAX_VERTEX_ NUM][MRAX_VERTEX_NUM]; // 路 径 矩 阵 ,二 维 数组 
typedef VRType ShortPathTable[LMAX_VERTEX_NUM]; // 最 短 距离 表 , 一 维 数 组 
void ShortestPath DIJ(MGraph G.int v0 .PathMatrix P.ShortPathTable D) 
{ // 用 Dijkstra 算法 求 有 向 网 G 的 vo 顶点 到 其 余 顶 点 v 的 最 短路 径 PLvj 及 带 权 长 度 DLv]。 
// 车 PLvjLw] 为 TRUE, 则 w 是 从 vo 到 当前 求 得 最 短路 径 上 的 顶点 。 
// final[v] 为 TRUE 当 且 仅 当 vE S, 即 已 经 求 得 从 v0 到 v 的 最 短路 径 。 算 法 7.15 
int vw,i,j; 


VRTYpe min; 
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Status final[ MAX VERTEX NUM]; 
// 辅助 矩阵 ,为 真 表示 该 顶点 到 vo 的 最 短 距离 已 求 出 , 初 值 为 假 
for(v= 0;v 一 G. vexnum;++v) 
{ final[v] = FALSE; // 设 初 值 
D[v] = G.arcs[v0][v].adj; // D[] 存 放 v0 到 v 的 最 短 距离 , 初 值 为 vo 到 v 的 直接 距离 
for(w= 0;w—G. vexnum;++w) 
PLvj[w] = FALSE; // 设 PL[][] 初 值 为 FALSE, 没 有 路 径 
if(D[v] 过 INFINITY) // v0 到 v 有 直接 路 径 
PLv][vo] = PLv][Lv] = TRUE; 
// 一 维 数组 pLv][] 表 示 源 点 vo 到 v 最 短路 径 通 过 的 顶点 ,目前 通过 v0 和 v 两 顶点 
} 
D[v0] = 0; // v0 到 v0 距离 为 0 
final[v0] = TRUE; // v0 顶点 并 人 S 集 
for(i=1;i<G. vexnum;+ti) // 对 于 其 余 G.vexnum- 1 个 顶点 
{ // 开始 主 循环 ,每 次 求 得 vo 到 某 个 顶点 v 的 最 短路 径 ,并 将 v 并 和 S 集 
min = INFINITY; // 当前 所 知 离 vo 顶点 的 最 近 距 离 , 设 初 值 为 ~ 
for(w= 0;w<<G. vexnum;+tw) // 对 所 有 顶点 检查 
if(1final[w]j&gD[w]<min) // 在 S 集 之 外 的 顶点 (其 final[] = FALSE) 中 
{ // 找 离 vo 最 近 的 顶点 w, 并 将 其 赋 给 v, 距 离 赋 给 min 
v=w; // 在 S 集 之 外 的 离 v0 最 近 的 顶点 序号 
min= D[w]; // 最 近 的 距离 
} 
final[v] = TRUE; // 将 v 并 人 S 集 
for(w= 0;w<G. vexnum;+tw) // 根据 新 并 人 的 顶点 ,更 新 不 在 S 集 的 顶点 到 vo 的 距离 和 路 径 数组 
if(!final[w]j&&gmin 一 INFINITY&&G.arcs[v][w].adj 一 INFINITY&&Cmnin + 
G.arcs[v][w].adj<D[w])) 
{ // w 不 属于 S 集 上 且 v0>v>w 的 距离 二 目前 v0->w 的 距离 
D[w] = min + G.arcs[v][w].adj; // 更 新 D[w] 
for(j = 0;j<6G. vexnum;++j) 
// 修改 PLw],v0 到 w 经 过 的 顶点 包括 vo 到 v 经 过 的 顶点 再 加 上 顶点 w 
PLwJ[j] = PLvJ[j]; 
P[w][w] = TRUE; 


} 

void main( ) 

{ 
int i,j; 
MGraph g; 
PathMatrix p; // 二 维 数组 ,路 径 和 矩阵 
ShortPathTable d; // 一 维 数组 .最 短 距离 表 
CreateDN(g) ; // 构造 有 向 网 g 


Display(g); // 输出 有 向 网 g 
ShortestPath DIJ(g,0,p,d); 
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// 以 g 中 序号 为 0 的 顶点 为 源 点 , 求 其 到 其 余 各 顶点 的 最 短 距离 。 存 于 d 中 


printf(" 最 短路 径 数组 p[i][] 如 下 : \n"); 
for(i=0;i<G.vexnum;++i) 
{ for(j = 0;j<g.vexnum;++j) 
printf£("%2d" ,pLi][j]); 
printf("\n"); 
} 


printf("%s 到 各 顶点 的 最 短路 径 长 度 为 \n" ,g. vexs[0].name); 


for(i= 0;i<G.vexnum;++i) 
if(i!l= 0) 


printf("%s>%s:%d\n" ,g.vexs[0]. name,g.vexs[i].name,d[i]); 


} 
程序 运行 结果 (以 教科 书 图 7. 34 的 G6 为 例 ): 


请 输入 6 个 顶点 的 值 ( 名 称 生 9 个 字符 ) : 
V0VLV2V3 WAS 
请 输入 8 条 弧 的 弧 尾 弧 头 权 值 : 
V0 V5 100 wu 
VO V4 30w” 
VO V2 10 
V1LV2 5& 
V2 V3 50 ww 
V3 V5 10& 妈 
V4 V3 20 巡 
V4 V5 60 
6 个 顶点 8 条 弧 的 有 向 网 。 顶 点 依次 是 : VO V1 V2 V3 V4 吧 5 
G.arcs.adj: 
32767 32767 10 32767 


30 


请 输入 有 向 网 G 的 顶点 数 , 弧 数 , 弧 是 否 含 相关 信息 (是 : 1 否 : 0): 6:.8,0 上 妇 ( 见 图 7-55) 


100 


32767 32767 5 32767 


32767 


32767 


32767 32767 32767 50 


32767 


32767 


32767 32767 32767 32767 


32767 


10 


32767 32767 32767 20 


32767 


60 


32767 32767 32767 32767 


32767 


32767 


G.arcs. info: 
弧 尾 _ 弧 头 该 弧 的 信息 : 
最 短路 径 数组 p[i][j] 如 下 : 
000000 
000000 
101000 
100110 
100010 
100111 
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V0 到 各 顶点 的 最 短路 径 长 度 为 
V0->V1: 32767 

VO—>V2: 10 

VO>V3.: 50 

VO—>V4: 30 

VO—>V5: 60 


函数 ShortestPath_DIJO) 利 用 两 个 辅助 数组 final[ ] 和 D[] 求 得 给 定点 v0 到 图 G 中 其 
余 各 顶点 的 最 短 距 离 。D[ ] 存 放 当 前 v0 到 其 余 各 顶点 的 最 短 距 离 , final[ ] 的 初 值 为 
FALSE。final[] 的 值 为 TRUE, 表 示 v0 到 该 顶点 的 最 短 距离 已 求 出 。 

图 7-56 通过 finalL] 和 D[] 的 变化 演示 了 求解 过 程 。 最 初 ,final[ 的 初 值 中 只 有 finalLv0] 
为 真 ,最短 距 离 顶点 集 S 中 只 有 顶点 v0( 源 点 ,此 例 中 实 参 为 VO) 。D[] 的 初 值 是 邻接 矩阵 
中 v0 行 所 对 应 的 值 。 另 令 DLv0]=0Cv0 到 自己 的 距离 当然 为 0) 。v0 到 某 顶 点 i 的 最 短 距 
离 可 能 是 二 者 的 直接 距离 G. arcs[v0][ij. adj ,也 可 能 是 由 v0 出 发 ,经 过 其 他 顶点 ,最 后 到 
达 顶 点 i 的 距离 。 如 图 7-55 中 V0 到 V5 的 最 短 距离 不 是 它们 的 直接 距离 100 ,而 是 由 V0 
经 过 V4、V3, 最 后 到 达 V5 的 距离 60。 


final D final D final D final D final D 
[0]| TRUE|| 0 [0O] | TRUE|| 0 [OJ|ITRUE|| 0 [OJITRUE|| 0 [0]| TRUE|| 0 
ID]IEALSEIL= | [IEALSBEI|e。 | [IEALSE|| ~ [IEALSE|| ~ [IEALSE||s。 


[2]IFALSEl|10| DTRUE|| 10 DTRuE|o| DTRuElno D]|TRUE|| 10 
DB]|FALSE|| ~ B]|FEALSE|| 60 [3]|FALSE|| 50 B]LTRUE || 50 [3]| TRUE|| 50 
[4]|FALSE|| 30 [4] |FALSE| 30 [4]|TRUE ||30 [4]|TRUE || 30 [4]| TRUE|| 30 
[SJlFALsEllio0o| GIFEALSEluool IIIEALSE|L90 [SJ]IFALSE|| 60 [5]| TRUE|L60 


(a) 初 什 (b) V2 并 入 S (c) V4 并 入 S (d) V3 并 入 S (e) V5 并 入 S 


图 7-56 运行 algo7-9. cpp 过 程 


根据 图 7-56(a) ,在 不 属于 S 集 的 顶点 中 ,V0 到 V2 的 距离 最 短 。 可 以 断定 ,V0 到 V2 
的 距离 10 是 最 短 距离 。V0 通过 其 他 顶点 绕道 到 达 V2 的 距离 一 定 会 比 10 大 , 故 将 V2 并 
和 人 S 集 中 (final[2] 二 TRUE)。 同 时 考察 S 集 外 的 项 点 中 ,有 没有 哪个 顶点 i, 使 得 V0 先 到 
V2( 距 离 为 10), 再 由 V2 到 达 顶 点 i 比 直 接 从 V0 到 达 顶 点 i 的 距离 要 小 ?也 就 是 满足 10 
十 G. arcs[2][i].adj<D[ 襄 。 如 有 , 则 改写 D[ 订 。V0 本 无 直接 到 达 V3 的 路 径 ,但 有 V0 一 
V2 一 V3 的 路 径 ,为 10 十 G. arcs[2][3]. adj 二 10 十 50 二 60, 故 改写 DL[3]==60, 如 图 7-56(b) 
所 示 。 用 这 样 的 方法 ,依次 将 V4、V3 和 V5 并 入 S。 详 见 图 7-56(c)、(d) 和 (e)。 

通过 final[] 和 D[] 可 求 得 给 定点 v0 到 图 G 中 其 余 各 顶点 的 最 短 距离 是 多 少 , 但 却 不 
知道 其 间 通 过 哪些 顶点 。 和 矩阵 PL]L] 有 这 些 顶 点 的 信息 。 以 程序 运行 结果 为 例 ,一 维 数组 
p[2] 口 中 的 1 是 V0 到 V2 经 过 的 顶点 (只 有 V0 和 V2 两 个 顶点 ); p[3][] 中 的 1 是 V0 到 
V3 经 过 的 顶点 (V0、V3 和 V4) 。 


752 每 一 对 顶点 之 间 的 最 短路 径 


// func7-8. cpp 算法 7.16.algo7-10. cpp 和 algo7-11. cpp 用 到 
void ShortestPath FLOYD(MGraph G.PathMatrix P.DistancMatrix D) 
{ // 用 Floyd 算法 求 有 向 网 6G 中 各 对 顶点 v 和 w 之 间 的 最 短路 径 PLv][wj[] 及 其 带 权 长 度 DLv][wj。 


// 车 PLvjLwj[u] 为 TROE, 则 uu 是 从 v 到 w 当 前 求 得 最 短路 径 上 的 顶点 。 算 法 7.16 
int u,v,w,i; 
for(v= 0;v<<G. vexnum;v++ ) // 各 对 结 点 之 间 初 始 已 知 路 径 及 距离 
for(w= 0;w< 一 G.vexnum;w++ ) 
{ D[v][w] = G.arcs[v][w].adj; // 顶点 v 到 顶点 w 的 直接 距离 
for(u= 0;u 一 G. vexnum;u++ ) 
P[vj[wj[u] = FALSE; // 路 径 和 矩阵 初 值 
if(D[v][w] 一 INEINITY) // 从 v 到 w 有 直接 路 径 
P[vj[wj[v]j=PLvjCwjCw]= TRUE; // 由 v 到 w 的 路 径 经 过 v 和 w 两 点 
} 
for(u= 0;u 一 G. vexnum;u++ ) 
for(v= 0;v 一 G. vexnumiv++ ) 
for(w= 0;w 一 G. vexnum;w++ ) 
if(D[v][uj 一 INFINITY&&D[u][w] 一 INFINITY&&D[v][u] + pD[u]j[wj 一 pD[v][w) 
{V// 从 v 经 u 到 w 的 一 条 路 径 更 短 
DLvj[w] = DLvj[Lu] + DLuj[w]; // 更 新 最 短 距离 
for(i=0;i<G.vexnum;i++ ) 
PLv]J[Lw][Li] = PLvjLoj[Li]||lPLo][Lw)[i]; 
// 从 VvV 到 w 的 路 径 经 过 从 vV 到 u 和 从 u 到 w 的 所 有 路 径 


// algo7-10. cpp 实现 算法 7.16 的 程序 
间 include"c1.h" 
# include" func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 
间 include"func7-2.cpp" // 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
间 include"c7-1.h" // 图 的 数组 (邻接 矩阵) 存储 结构 
# include"bo7-1.cpp" // 图 的 数组 (邻接 矩阵 ) 存 储 结构 的 基本 操作 
typedef char PathMatrix[MAX VERTEX NUM]|[MAX VERTEX NUM|[MAX VERTEX NUM]; 
// 三 维 数组 ,其 值 只 可 能 是 0 或 1, 故 用 char 类 型 以 减少 存储 空间 的 浪费 
typedef VRType DistancMatrix[MAX_VERTEX_NUM][MAX_VERTEX_NUM]; // 二 维 数组 
间 include"func7-8.cpp" // 求 有 向 网 中 各 对 顶点 之 间 最 短 距 离 的 Floyd 算法 
void main( ) 
{ 

MGraph g; 

int i,j,k; 

PathMatrix p; // 三 维 数组 

DistancMatrix d; // 二 维 数 组 

CreateDN(g) ; // 构造 有 向 网 g 

for(i= 0;i<G. vexnum;i++ ) 

g.arcs[i][i].adj=0; 
// ShortestPath_FLOYD() 要 求 对 角 元 素 值 为 0, 因 为 两 点 相同 ,其 距离 为 0 

Display(g); // 输出 有 向 网 g 

ShortestPath FLOYD(g,p,d); // 求 每 对 顶点 间 的 最 短路 径 。 在 func7-8. cpp 中 

printf("d 和 矩阵 : \n"); 

for(i=0;i<~G.vexnum;i++ ) 

{ for(j= 0;j<g.vexnum;j++) 
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printf("%6d" ,d[i][j]); 
printf("\n"); 
} 
printf("p 矩阵 :\n"); 
for(i= 0;i 一 G.vexnum;i++ ) 
for(j= 0;]j 一 g. vexnum;j++ ) 
if(il=j) 
{ printf(" 由 %s 到 %s 经 过 : ",g.vexs[i].name,g. vexs[j].name); 
for(k = 0;k 一 g. vexnum;k++ ) 
if(p[Li][j][k] == 1) 
printf("%s",g.vexs[k|. name); 
printf("\n"); 
} 
} 


程序 运行 结果 (以 教科 书 中 图 7. 36 的 G7 为 例 ) : 


请 输入 有 向 网 G 的 顶点 数 , 弧 数 , 弧 是 否 含 相关 信息 (是 : 1 否 : 0): 3,5,0 x ( 见 图 7-57) 
请 输入 3 个 顶点 的 值 ( 名 称 过 9 个 字符 ): 


ABCy 

请 输入 5 条 弧 的 弧 尾 弧 头 权 值 : 

有 RB4e 

号 

BAG6y 

BC2w/ 

CR3i 

3 个 顶点 5 条 弧 的 有 向 网 。 顶 点 依次 是 : ABC 图 7-57 有 向 网 

G.arcs.adj: 
0 4 11 
6 0 2 
3 32767 0 


G.arcs. info: 


弧 尾 弧 头 该 弧 的 信息 : 


d 和 矩阵 : 
0 4 6 
5 0 2 
3 7 0 
P 和 矩阵 : 


由 A 到 B 经 过 : AB 
由 A 到 CcC 经 过 : ABC 
由 B 到 A 经 过 : ABC 
由 B 到 C 经 过 : BC 
由 C 到 A 经 过 : AC 
由 C 到 B 经 过 : ABC 


求 有 向 网 中 各 对 顶点 之 间 最 短 距离 的 Floyd 算法 ShortestPath_FLOYD() 要 求 其 网 的 
邻接 矩阵 中 对 角 元 素 的 权 值 为 0。 因为 用 邻接 矩阵 表示 各 顶点 之 间 的 距离 ,显然 ,同一 点 之 


间 的 距离 为 0。 

ShortestPath FLOYD() 算 法 的 思路 很 简单 ,首先 以 2 顶点 之 间 的 直接 路 径 为 最 短路 
径 , 如 果 能 找到 第 3 点 ,使 2 顶点 通过 第 3 点 的 路 径 比 直接 路 径 要 短 , 则 以 这 3 点 形成 的 路 
径 为 2 顶点 之 间 的 最 短路 径 。 依 次 再 找 第 4 点 .第 5 点 、…… 如 以 上 程序 运行 结果 所 示 , 根 
据 图 7-57 及 邻接 矩阵 ,A-~>~C 的 直接 距离 是 11 .但 A~>B-~>C 的 距离 是 6, 则 以 6 取代 11 作 
为 A 一 C 的 最 短 距 离 。 

ShortestPath FLOYD() 不 仅 可 用 于 有 向 网 .也 可 用 于 无 向 网 。 因 为 无 向 网 的 1 条 边 相 
当 于 有 向 网 的 2 条 弧 。 

教科 书 中 图 7. 33 是 描述 中 国内 地 铁路 交通 的 无 向 网 。 程 序 algo7-11. cpp 利用 
ShortestPath FLOYD() 可 求 得 该 网 中 每 两 个 站 点 之 间 的 最 短 距 离 。 该 无 向 网 的 数据 是 利 
用 文件 map. txt 输入 的 。map. txt 的 内 容 如 下 (在 教科 书 中 图 7. 33 的 基础 上 另 加 孤立 顶点 
台北 ): 


3 

26 

乌鲁木齐 呼和浩特 哈尔滨 西宁 兰州 成 都 昆明 贵阳 南宁 柳州 株洲 广州 深圳 南昌 福州 上 海 
武汉 西安 郑州 徐州 北京 天 津 沈阳 大 连 长 春 台北 
30 

乌鲁木齐 兰州 1892 
呼和浩特 兰州 1145 
呼和浩特 北京 668 
哈尔滨 长 春 242 
西宁 兰州 216 

兰州 西安 676 

西安 成 都 842 

西安 郑州 511 

成 都 昆明 1100 
成 都 贵阳 967 

昆明 贵阳 639 

贵阳 柳州 607 

柳州 株洲 672 

柳州 南宁 255 

贵阳 株洲 902 

株洲 武汉 409 

株洲 广州 675 

株洲 南昌 367 

广州 深圳 140 

南昌 福州 622 

南昌 上 海 825 

武汉 郑州 534 

郑州 北京 695 

郑州 徐州 349 

徐州 天 津 674 
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徐州 上 海 651 
北京 天 津 137 
天 津 沈阳 704 
沈阳 大 连 397 
沈阳 长 春 305 


// algo7-11. cpp 实现 教科 书 图 7.33 的 程序 (新 增 孤 立项 点 台北 ) 
间 include"cl.h" 
提 include"func7-1.cpp" // 包括 顶点 信息 类 型 的 定义 及 对 它 的 操作 
间 include"func7-2.cpp" // 包括 弧 ( 边 ) 的 相关 信息 类 型 的 定义 及 对 它 的 操作 
间 include"c7-1.h" // 图 的 数组 (邻接 矩阵 ?存储 结 构 
间 include"bo7-1.cpp" // 图 的 数组 (邻接 和 矩阵) 存储 结构 的 基本 操作 
typedef char PathMatrix[MAX VERTEX NUM|[MAX VERTEX NUM |[ MAX VERTEX NUM]; 
// 三 维 数组 ,其 值 只 可 能 是 0 或 1, 故 用 char 类 型 以 减少 存储 空间 的 浪费 
typedef VRType DistancMatrix[ MAX VERTEX NUM][MAX_VERTEX_NUM]; // 二 维 数组 
间 include"func7-8.cpp" // 求 有 向 网 中 各 对 顶点 之 间 最 短 距离 的 Floyd 算法 
void path(MGraph G,PathMatrix P,int i,int j) 
{ // 求 由 序号 为 二 的 起 点 城市 到 序号 为 j 的 终点 城市 最 短路 径 沿途 所 经 过 的 城市 
int km= ii // 起 点 城市 序号 赋 给 m 
printf(" 依 次 经 过 的 城市 : \n"); 
while(m!l=j) // 未 到 终点 城市 
{ G.arcs[m][m].adj = INFINITY; // 对 角 元 素 赋 值 无 穷 大 
for(k = 0;k 一 G. vexnum;k++ ) 
if(G.arcs[m|[k].adj<INFINITY&&P[m][j][k]) 
{ // nm 到 k 有 直接 通路 , 且 k 在 m 到 上 j 的 最 短路 径 上 
printf("%s",G. vexs[m].name); 
G.arcs[m][k].adj = G.arcs[k][m].adj = INFINITY; // 将 直接 通路 设 为 不 通 
m=k; // 经 过 的 城市 序号 赋 给 m, 继 续 查 找 
break; 


} 
printf("%s\n",G. vexs[j]. name); // 输出 终点 城市 
} 
void main() 
{ 
MGraph g; 
int i,j,k,q=1; 
PathMatrix p; // 三 维 数 组 
DistancMatrix d; // 二 维 数 组 
char filename[8] = "map.txt"; // 数据 文件 名 
CreateFromFile(g,filename,0); // 通过 文件 map. txt 构造 没有 相关 信息 的 无 向 网 g 
for(i=0;i<~G.vexnum;i++ ) 
g.arcs[i][i].adj= 0; 
// ShortestPath_FLOYD() 要 求 对 角 元 素 值 为 0, 因 为 两 点 相同 ,其 距离 为 0 


ShortestPath FLOYD(g,p,d); // 求 每 对 顶点 间 的 最 短路 径 ,在 func7-8. cpp 中 


while(q) 

{ printf(" 请 选择 : 1 查询 0 结束 \n"); 
scanf("%d",&q); 
if(g) 
{ printf(" 城 市 代码 : \n"); 


for(i= 0;i< 一 G.vexnum;i++ ) 


{ printf("%2d.% -8s",i+1,g.vexs[i].name); 
i£(i%%7== 6) // 输出 7 个 数据 就 换行 


printf("\n"); 
} 


printf("\n 请 输入 要 查询 的 起 点 城市 代码 终点 城市 代码 : "); 


scanf("%d%d",&i,&j); 


if(dLi-1][j- 菇 一 INFINITY) // 有 通路 


{ printf("%s 到 ss 的 最 短 距 离 为 sd\n" ,g. vexs[i- 1].name,g.vexs[j-1].name， 


dLi-1][j-1])， 


path(g,p,i-1,j-1); // 求 最 短路 径 上 由 起 点 城市 到 终点 城市 沿途 所 经 过 的 城市 


} 


else 


printf("%s 到 %s 没有 路 径 可 通 \n" ,g. vexs[i- 1].name,g.vexs[j- 1].name); 
printf(" 与 %s 到 %s 有 关 的 p 和 矩阵: \n",g.vexs[i-1].name,g.vexs[j—1].name); 


for(k = 0;k 一 g. vexnum;k++ ) 
printf("%2d" ,p[i—1][j-1][k]); 
printf("\n"); 


} 
程序 运行 结果 : 


请 选择 : 1 查询 0 结束 

ly 

城市 代码 : 

1. 乌 鲁 木 齐 2. 呼 和 浩特 3. 哈 尔 滨 ”4. 西 宁 
8. 贵 阳 9. 南 宁 ”10. 柳 州 11. 株洲 
15. 福州 16. 上 海 17. 武 汉 18. 西 安 
22. 天 津 23. 沈 阳 24. 大 连 25. 长 春 


乌鲁木齐 到 柳州 的 最 短 距离 为 4694 
依次 经 过 的 城市 : 

乌鲁木齐 兰州 西安 郑州 武汉 株洲 柳州 
与 乌鲁木齐 到 柳州 有 关 的 p 矩阵 : 


请 选择 : 1 查询 0 结束 
1 


10001000011000001110000000 


26. 台 
请 输入 要 查询 的 起 点 城市 代码 终点 城市 代码 : 1 10 必 


6. 成 都 7. 昆 明 
13. 深圳 14. 南昌 
20. 徐州 21. 北 京 
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城市 代码 : 

1. 乌鲁木齐 2. 呼 和 浩特 3. 哈尔滨 ”4. 西 宁 5. 兰 州 6. 成 都 7. 昆 明 
8. 贵 阳 9. 南 宁 10. 柳州 11. 株 洲 12. 广 州 13. 深圳 14. 南 昌 
15. 福 州 16. 上 海 17. 武 汉 18. 西 安 19. 郑 州 20. 徐 州 21. 北 京 
22. 天 津 23. 沈 阳 24. 大 连 25. 长 春 26. 台北 

请 输入 要 查询 的 起 点 城市 代码 终点 城市 代码 : 21 26 yx 

北京 到 台北 没有 路 径 可 通 

与 北京 到 台北 有 关 的 P 和 矩阵 : 

00000000000000000000000000 

请 选择 : 1 查询 0 结束 
Ox 


和 algo7-9. cpp 中 的 ShortestPath _DIJ () 类 似 , algo7-11. cpp 中 的 ShortestPath _ 
FLOYD() 也 有 存放 最 短路 径 通过 的 顶点 的 数组 P。 在 这 里 ,数组 P 是 三 维 的 。 一 维 数组 
P[LvjLwj[] 中 的 信息 是 从 顶点 v 到 顶点 w 最 短 距离 所 通过 的 顶点 。 如 P[vj[wj[uj==1, 说 
明 从 顶点 v 到 顶点 w 的 最 短 距离 通过 顶点 u。 而 PLvj[wj[t]j 二 0, 则 说 明 从 顶点 v 到 顶 
点 w 最短 距 离 不 通过 顶点 t。 以 上 面 的 程序 运行 结果 为 例 ,DL0][9J 是 乌鲁木齐 到 柳州 的 
最 短 距离 ,PL0J[9][]=={10001000011000001110000000), 对 照 序号 可 
知 , 乌 鲁 木 齐 到 柳州 的 最 短 距 离 经 过 乌鲁木齐 .兰州 .柳州 株洲. 武汉、 西安 和 郑州 7 个 
城市 。 

为 了 求 得 依次 经 过 的 城市 ,调用 path() 。path() 的 算法 是 : 对 于 从 顶点 v 到 顶点 w 最 
短 距离 路 径 的 起 点 v, 它 的 下 一 点 u 是 满足 G. arcs[vj[Luj. adj 不 是 无 穷 (v 到 u 有 直接 通 
路 ) 同 时 PLvjLwj[uj=1(u 在 v 到 w 的 最 短路 径 上 ) 条 件 的 唯一 顶点 。 将 G. arcs[v][u]. 
adj 改 为 无 穷 ( 避 免 又 回头 找 v) ,再 从 u 找 满足 G. arcs[u][xj. adj 不 是 无 穷 (u 到 x 有 直接 
通路 ) 同 时 PLv][wj[xj==1(x 在 v 到 w 的 最 短路 径 上 ) 条 件 的 唯一 顶点 x。 循 环 这 个 过 程 ， 
直至 到 达 终 点 w。 

孤立 顶点 台北 和 北京 不 在 同一 个 连通 分 量 中 , 故 它们 之 间 没 有 路 径 可 通 。 对 应 的 一 维 
数组 PL20J[L25][j 是 全 0。 

algo7-11. cpp 虽然 能 够 求 得 任意 两 城市 间 的 最 短路 径 , 但 它 的 DOS 界面 总 让 我 们 感到 
不 方便 。 我 们 也 可 以 在 可 视 化 的 界面 下 实现 algo7-11. cpp 的 功能 。 

shortest 子 目 录 中 的 软件 实现 了 algo7-11. cpp 的 可 视 化 。 在 Visual C++H6.0 环境 下 打 
文件 shortest\shortest. dsw, 按 F7 键 编译 后 , 按 Ctrl 十 F5 键 运行 ,就 会 出 现 图 7-58 所 示 
的 界面 。 移 动 光标 到 待 查 询 的 起 点 城市 顶点 圆圈 中 并 单 击 鼠标 左 键 , 即 选 定 了 起 点 城市 。 
该 城市 的 顶点 圆圈 变 成 虚线 。 再 移动 光标 到 待 查 询 的 终点 城市 顶点 圆圈 中 并 再 次 单 击 
鼠标 左 键 , 即 选 定 了 终点 城市 。 这 时 ,从 起 点 城市 到 终点 城市 最 短 距离 的 沿途 城市 顶点 
圆圈 及 沿线 均 变 成 虚线 。 同 时 ,在 信息 框 中 还 用 文字 说 明 两 城市 间 的 最 短 距 离 及 依次 经 
过 的 城市 。 

图 7-59 是 运行 文件 shortest\shortest. dsw 并 依次 用 鼠标 左 键 单 击 昆 明和 哈尔滨 的 结 
果 。 这 个 过 程 可 以 反复 进行 ,直到 按 下 “退出 ”按钮 。 


第 7 章 


图 7-58 运行 shortest. dsw 出 现 的 初始 界面 


7-59 和 运行 shortest dsw 求 得 昆明 到 哈尔滨 的 最 短 距 离 
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algo7-11. cpp 调用 的 许多 函数 都 柑 到 shortest\ 软 件 中 了 。 有 一 些 根 据 具体 情况 做 了 修 
改 。 如 mapvc. txt 的 内 容 如 下 : 


3 

26 

乌鲁木齐 31 26 
呼和浩特 277 86 
哈尔滨 607 26 
西宁 109 142 
兰州 175 154 
成 都 169 214 
昆明 103 282 
贵阳 187 274 
南宁 187 318 
柳州 247 298 
株洲 307 262 
广州 295 322 
深圳 355 334 
南昌 379 262 
福州 445 274 
上 海 463 218 
武汉 349 222 
西安 253 170 
郑州 337 170 
徐州 415 170 
北京 385 98 
天 津 445 114 
沈阳 523 90 
大 连 493 150 
长 春 565 58 
台北 475 318 

30 

乌鲁木齐 兰州 1892 
呼和浩特 兰州 1145 
…( 以 下 同 数 据 文 件 map. txt, 故 略 ) 


和 algo7-11. cpp 调用 的 数据 文件 map. txt 相 比 ,mapvc. txt 中 的 顶点 信息 不 仅 有 城市 
名 称 , 还 有 城市 在 图 中 的 x、y 坐标 。 因 此 ,顶点 信息 结构 如 下 : 
struct VertexType // 顶点 信息 类 型 
{ char name[ MAX_NAME]; // 顶点 名 称 
POINT pos; // 顶点 坐标 
上 


其 中 ,POINT 是 Visual C++H6.0 软件 定义 的 结构 体 , 用 于 表示 点 的 坐标 , 它 的 结构 如 下 : 


Struct POINT 

{ LONG x; 
LONG y; 

}; 


文件 bo7-1. cpp 中 的 函数 CreateFromFile() 和 LocateVex() .文件 func7-8. cpp 中 的 也 
数 ShortestPath FLOYD() 未 做 任何 修改 就 直接 用 到 了 程序 中 ; InputFromFile( ) 根 据 
VertexType 的 类 型 重 写 了 ,由 于 没有 边 的 相关 信息 ,InputArcFromFile() 仅 是 空 函 数 。 

这 个 软件 说 明 : 在 视窗 时 代 , 算 法 和 数据 结构 并 没有 过 时 ,仍然 是 软件 的 灵 瑰 。 视 窗 手 
段 能 使 界面 变 得 漂亮 ,但 要 想 实 现 众 多 的 复杂 功能 ,还 必须 依靠 算法 和 数据 结构 。 
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在 实际 工作 中 ,经 常会 遇 到 需要 查找 某 个 数据 或 某 类 数据 的 情况 。 如 在 学 籍 管理 的 信 
息 中 查找 某 人 的 各 科 成 绩 ; 在 高 考 信息 中 查找 总 分 高 于 分 数 线 的 考生 的 姓名 .住址 和 考 号 
等 。 一 般 要 按 关键 字 来 查找 ,姓名 、 考 号 和 总 分 都 可 以 作为 关键 字 。 唯 一 地 标识 一 个 记录 的 
关键 字 称 为 主 关 键 字 ,如 考生 的 考 号 ; 标识 若干 个 记录 的 关键 字 称 为 次 关键 字 , 如 高 考 
分 数 。 

一 般 来 说 ,数据 的 值 不 止 包括 关键 字 , 还 包括 其 他 信息 。 关 键 字 只 是 查找 的 依据 。 为 了 
描述 方便 ,有 时 仅 讨 论 关 键 字 。 


8.1 静态 查找 表 


静态 查找 表 在 查找 过 程 中 不 改变 表 中 的 数据 一 一 不 插 不 删 , 故 基本 采用 顺序 存储 结构 。 
它 适合 用 于 数据 不 变动 或 不 常 变动 的 表 。 如 高 考 成 绩 查询 表 、 本 单位 职工 信息 表 等 。 


8.1.1 顺序 表 的 查找 


// c8-1.h 静态 查找 表 的 顺序 存储 结构 。 在 教科 书 第 216 页 

struct SSTable // 静态 查找 表 ( 见 图 8-1) 

{ ElemType * elem; // 数据 元 素 存储 空间 基 址 , 建 表 时 按 实际 长 度 分 配 ,0 号 单元 留 空 
int length; // 表 长 度 

}s 


// bo8-1.cpp 静态 查找 表 ( 顺 序 表 和 有 序 表 ) 的 基本 操作 (7 个 ) .包括 算法 9.1 和 算法 9.2 
void Creat SeqFromFile(SSTable &ST,.char# filename) 
{ // 操作 结果 : 由 数据 文件 构造 静态 顺序 查找 表 ST( 见 图 8-2) 


int i; 

FILE * f; // 文件 指针 类 型 SSTable ”BlemType 
f= fopen(filenane,"r"); // 打开 数据 文件 ,并 以 上 表示 [oem | 
fscanf(f,"gd",&ST. length) ; // 由 文件 输入 数据 元 素 个 数 Ee 

ST. elem = (ElemType * )calloc(ST. length + 1,sizeof(FlenmType)); 图 8-1 静态 查找 表 的 


// 动态 生成 ST. length+1 个 数据 元 素 空 间 (0 号 单元 不 用 ) 顺序 存储 结构 


证 (1ST.elem) // 生成 失败 

exit(OVERFLOW) ; 
for(i=1;i<= ST. length;i++ ) 

InputFromFile(f,ST. elem[i]); 

// 由 文件 依次 输入 静态 顺序 查找 表 ST 的 数据 元 素 ,在 func8-1.cpp 中 
fclose(f); // 关闭 数据 文件 


Datan |[n] 
} 
void Ascend( SSTable &ST) 和 
> = c = Data2 
{ // 重建 静态 查找 表 为 按 关 键 字 非 降序 排序 0 Daial. |it1] 
int i,j,k; =| [0] 
for(i=1;i<ST. length;i++ ) n 
{ k=i; //k 存 当前 关键 字 最 小 值 的 序号 图 8-2 具有 n 个 数据 元 素 的 
ST. elem[0] = ST. elem[i]; // 待 比 较 值 存 [0] 单 元 静态 顺序 查找 表 ST 


for(j= i+1;j<= ST. length;j++ ) // 从 元 素 [ 订 之 后 比 起 
if LT(ST. elem[j]. key,ST. elem[0].key) // 当前 元 素 的 关键 字 小 于 待 比较 元 素 的 关键 字 
{ k=j; // 将 当前 元 素 的 序号 存 于 上 
ST.elem[0] = ST. elem[j]; // 将 当前 元 素 的 值 存 L0] 单 元 
} 
if(k1=i) // 有 比 [ 订 更 小 的 值 则 交换 
{ ST.elem[k] = ST.elenm[i]; 
ST. elem[ i] = ST. elem[ 0]; 
} 


} 

void Creat OrdFromFile(SSTable &ST,char# filename) 

{ // 操作 结果 : 巾 含 n 个 数据 元 素 的 数组 = 构造 按 关键 字 非 降序 查找 表 ST 
Creat_SeqFromFile(ST,filename); // 建立 无 序 的 查找 表 ST 
Ascend(ST) ; // 将 无 序 的 查找 表 ST 重建 为 按 关键 字 非 降序 查找 表 

} 

Status Destroy(SSTable &ST) 

{ // 初始 条 件 : 静态 查找 表 ST 存在 。 操 作 结 果 : 销毁 表 ST( 见 图 8-3) 


free(ST. elem) ; // 释放 动态 存储 空间 ST 

ST. elem = NULL; // 指针 域 置 空 NULL 

ST. length= 0; // 表 长 为 0 0 

return OK; 图 8-3 销毁 表 ST 


} 

int Search Seq(SSTable ST.KeyType key) 

{ // 在 顺序 表 ST 中 顺序 查找 其 主 关键 字 等 于 key 的 数据 元 素 。 
// 若 找 到 , 则 返回 该 元 素 在 表 中 的 位 置 ,否则 返回 0。 算法 9.1 
int i; 
ST. elem[0]. key = key; // 哨兵 ,关键 字 存 [0] 单 元 
for(i = ST. length; IEQ(ST. elem[i].key,key) ;一 ); // 从 后 往 前 找 
return i; // 找 不 到 时 ,i 为 0 

} 

int Search Bin(SSTable ST.KeyType key) 
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{ // 在 有 序 表 ST 中 折 半 查找 其 主 关键 字 等 于 key 的 数据 元 素 。 
// 车 找到 , 则 返回 该 元 素 在 表 中 的 位 置 ,否则 返回 0。 算法 9. 2 
int mid,low=1,high = ST. length; // 置 区 间 初 值 
while(low 一 = high) // 查找 范围 大 于 0 
{ mid= (low+ high)/2; // 中 值 

if EQ(key,ST. elem[mid].key) // 中 值 是 待 查找 元 素 
return mid; // 返回 其 序号 
else if LT(key,ST. elem[mid].key) // 关键 字 小 于 中 值 
high= mid 一 1; // 继续 在 前 半 区 间 进 行 查找 
else 
low = mid+1; // 继续 在 后 半 区 间 进 行 查找 
} 
return 0; // 顺序 表 中 不 存在 待 查找 元 素 

} 

void Traverse(SSTable ST,void(# Visit) (ElemType)) 

{ // 初始 条 件 : 静态 查找 表 ST 存在 ,Visit() 是 对 元 素 操 作 的 应 用 函数 
// 操作 结果 : 按 顺 序 对 ST 的 每 个 元 素 调 用 函数 Visit()1 次 且 仅 1 次 
int i; 

ElemType * p= ++ST.elem; // p 指 向 第 1 个 元 素 
for(i=1;i<<= ST. length;i++ ) // 依次 对 所 有 元 素 
Visit(* p++ ); // 调用 函数 Visit(),p 指向 下 一 个 元 素 
} 


bo8-1. cpp 中 构造 静态 查找 表 的 基本 操作 函数 是 通过 数据 文件 构造 的 ,在 数据 量 较 大 
的 情况 下 ,通过 数据 文件 来 输入 数据 是 常用 的 方法 ,这 会 提高 效率 和 降低 差错 。 为 了 使 
bo8-1. cpp 中 的 基本 操作 函数 的 应 用 不 受 具 体 数据 元 素 类 型 限制 ,不 在 bo8-1. cpp 中 确定 
ElemType 的 具体 类 型 。 而 是 由 独立 的 文件 来 定义 ElemType 和 关键 字 的 具体 类 型 以 及 对 
它们 的 输入 输出 操作 。func8-1. cpp 以 教科 书 图 9. 1 高 考 成 绩 为 例 定义 了 ElemType 的 类 
型 。 其 中 包括 准 考证 号 、 姓 名 各 科 成 绩 及 总 分 。 关 键 字 key 是 结构 体 ElemType 的 一 个 成 
员 , 在 此 定义 为 准 考证 号 。 

// func8-1. cpp 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 

typedef long KeyType; // 定义 关键 字 域 为 长 整 型 

间 define key number // 定义 关键 字 为 准 考证 号 

struct ElemType // 数据 元 素 类 型 (以 教科 书 图 9.1 高 考 成 绩 为 例 )( 见 图 8-4) 


ElemType 


number | name | politics | Chinese | English | math | physics | chemistry | biology | total 


key 
图 8-4 数据 元 素 类 型 


{ long number; // 准 考证 号 ,与 关键 字 类 型 同 
char name[9]; // 姓名 (4 个 汉字 加 1 个 串 结束 标志 ) 
int politics; // 政治 
int Chinese; // 语文 


int English; // 英语 
int math; // 数学 
int physics; // 物理 
int chemistry; // 化 学 
int biology; // 生物 
int total; // 总 分 
}s 
void Visit(ElemType c) // Traverse() 调 用 的 与 之 配套 的 访问 数据 元 素 的 函数 
{ printf("% — 8ld% —- 8s %4d%5d%5d%5d%S5d%S5d%5d%5d\n",c.number,c. name,c. politics, 
c.Chinese,c. English,c. math,c. physics,c. chemistry,c. biology,c. total); 
} 
void InputFromFile(FILE#f,ElemType &c) // 与 之 配套 的 从 文件 输入 数据 元 素 的 函数 
{ fscanf(f,"%ld%s%d%d%d%d%dsd%d" ,gc.number,c. name,&c. politics,&c. Chinese, 
&c. English,&c.math,&c. physics,&c.chemistry,&c. biology); 
} 
void InputKey(KeyType &k) // 与 之 配套 的 由 键盘 输入 关键 字 的 函数 
{ scanf("%1d",&k); 
} 


// c8-2.h 对 两 个 数值 型 关键 字 的 比较 约定 为 如 下 的 宏 定义 。 在 教科 书 第 215 页 
define FQ(a,b)((a) == (b)) 

define LT(a,b)((a) 一 (b)) 

define LO(a,b)((a) 一 = (b)) 


可 以 通过 数据 文件 f8-1. txt 构造 静态 表 。 它 符合 func8-1. cpp 中 从 文件 输入 数据 元 素 
的 函数 对 数据 的 要 求 。f8-1. txt 的 内 容 如 下 : 


5 

179328 何 芳 芳 85 89 98 100 93 80 47 
179325 陈 红 85 86 88 100 92 90 45 
179326 陆 华 78 75 90 80 95 88 37 
179327 张 平 82 80 78 98 84 96 40 
179324 赵 小 怡 76 85 94 57 77 69 44 


顺序 表 中 数据 的 排列 可 以 是 有 序 的 :也 可 以 是 无 序 的 。 如 果 是 有 序 表 ,可 采用 折 半 法 查 
找 , 每 查找 一 次 ,就 把 查找 范围 缩小 一 半 。 在 数据 量 大 的 情况 下 ,这 种 方法 效率 很 高 。 如 果 
是 无 序 表 , 则 只 能 从 表 的 一 端 起 ,逐一 查找 了 。algo8-1. cpp 是 检验 bo8-1. cpp 中 无 序 顺序 
表 基 本 操作 的 程序 。 


// algo8-1. cpp 检验 bo8-1. cpp( 无 序 顺序 表 部 分 ) 的 程序 

间 include"cl.h" 

间 include"func8-1.cpp”// 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 

间 include"c8-1.h" // 静态 查找 表 的 顺序 存储 结构 

间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 

# include"bo8-1.cpp" // 静态 查找 表 ( 顺 序 表 和 有 序 表 ) 的 基本 操作 (7 个 ) 


void main() 
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SSTable st; 
int i; 
long s; 
char filename[13]; // 存储 数据 文件 名 (包括 路 径 ) 
printf(" 请 输入 数据 文件 名 :"); 
scanf("%s",filename); 
Creat_SeqFromFile(st,filename); // 由 数据 文件 产生 顺序 静态 查找 表 st 
for(i=1;i<= st.length;i++ ) // 依次 计算 每 项 数据 元 素 的 总 分 
st.elem[i].total = st.elem[i].politics+ st.elem[i].Chinese + st.elem[i].FEnglish+ 
st.elem[i].math+ st.elem[i].physics + st.elem[i].chemistry+ st.elem[ i].biology; 
printf(" 准 考证 号 姓名 政治 语文 外 语 数学 物理 化 学 生物 总 分 \n"); 
Traverse(st,Visit); // 按 顺序 输出 静态 查找 表 st 
printf(" 请 输入 待 查找 人 的 考 号 : ")， 
InputKey(s); // 由 键盘 输入 关键 字 s, 在 func8-1. cpp 中 
i= Search_Seq(st,s); // 在 静态 查找 表 st 中 顺序 查找 含有 关键 字 s 的 项 的 序号 
iE(i) // 找到 
Visit(st. elem[i]); // 输出 该 项 元 素 ,在 func8-1. cpp 中 
else 
printf(" 未 找到 \n"); 
Destroy(st); // 销毁 静态 查找 表 st 
} 


程序 运行 结果 : 


请 输入 数据 文件 名 : f8-1. txty 
准 考证 号 ”姓名 ”政治 语文 外 语 数学 物理 化 学 生物 总 分 
179328 何 芳 芳 。 85 89 98 100 93 80 47 592 


179325 陈 红 85 86 88 100 92 90 45 586 
179326 陆 华 78 5 90 80 95 88 37 543 
179327 张 平 82 80 78 98 84 96 40 558 


179324 赵 小 怡 76 85 94 57 3 69 44 502 
请 输入 待 查找 人 的 考 号 : 179326k 
179326 ” 陆 华 78 骂 90 80 95 88 37 543 


8.12 有 序 表 的 查找 


algo8-2. cpp 是 检验 bo8-1. cpp 中 有 序 顺序 表 基 本 操作 的 程序 。 在 它 所 包含 的 func8-2. cpp 
中 , 待 查找 的 数据 本 身 只 有 关键 字 一 项 。 但 为 利用 bo8-1. cpp 中 的 函数 , 仍 定 义 ElemType 
为 结构 体 , 其 中 只 有 一 个 成 员 ,就 是 关键 字 key。func8-2. cpp 也 定义 了 对 这 种 数据 元 素 类 
型 的 输入 输出 操作 。 

// func8-2. cpp 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 

typedef int KeyType; // 定义 关键 字 域 为 整 型 


struct ElemType // 数据 元 素 类 型 ( 见 图 8-5) 
{ KeyType key; // 仅 有 关键 字 域 图 8-5 数据 元 素 类 型 


ElemType 


key 


}s 

void Visit(ElemType c) // Traverse() 调 用 的 与 之 配套 的 访问 数据 元 素 的 函数 

{ printf("%d",c.key); 

} 

void InputFromFile(FILE # ,ElemType &c) // 与 之 配套 的 从 文件 输入 数据 元 素 的 函数 
{ fscanf(f,"%d",&c.key); 

} 

void InputKey(KeyType &k) // 与 之 配套 的 由 键盘 输入 关键 字 的 函数 

{ scanf("%d",&k); 

} 


数据 文件 f8-2. txt 内 容 如 下 , 它 符合 func8-2. cpp 中 从 文件 输入 数据 元 素 的 函数 对 数据 
的 要 求 。 


3 
513 19 21 37 56 64 75 80 88 92 


// algo8-2. cpp 检验 bo8-1.cpp( 有 序 表 部 分 ) 的 程序 
间 include"cl.h" 
间 include"func8-2.cpp" // 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 
间 include"c8-1.h" // 静态 查找 表 的 顺序 存储 结构 
间 include"c8-2.h"”// 对 两 个 数值 型 关键 字 比较 的 约定 
间 include"bo8-1.cpp”// 静态 查找 表 (顺序 表 和 有 序 表 ) 的 基本 操作 (7 个 ) 
void main() 
{ 
SSTable st; 
int i; 
KeyType s; 
Creat_OrdFromFile(st,"f8-2.txt"); // 由 数据 文件 产生 非 降序 查找 表 st( 见 图 8-6) 
printf(" 有 序 表 为 "); 
Traverse(st,Visit); // 顺序 输出 静态 查找 表 st 
printf("\n"); 
printf(" 请 输入 待 查找 数据 的 关键 字 :"); 


InputKey(s); // 由 键盘 输入 关键 字 s, 在 func8-2.cpp 中 92][11] 一 一 high 初 值 
i= Search Bin(st,s); [88 |[10 
// 在 有 序 的 静态 查找 表 st 中 折 半 查找 含有 关键 字 s 的 项 的 序号 |80 | [9 
if(i) 75| [8 
printf("%d 是 第 %d 个 数据 的 关键 字 \n" ,st. elem[ i].key,i); [64 [7 

aii 156 | [6] 一 一 mid 初 值 
printf(" 未 找到 \n") 前 辽 
Destroy(st); // 销毁 有 序 的 静态 查找 表 st 19| 6 
[3| [2 

程序 运行 结果 : 世 国人 同仁 


有 序 表 为 5 13 19 21 37 56 64 75 80 88 92 11 
请 输入 待 查找 数据 的 关键 字 : 37w 图 8-6 具有 11 个 数据 元 素 
37 是 第 5 个 数据 的 关键 字 的 有 序 查找 表 st 


数据 结构 算法 解析 


8.13 静态 树 表 的 查找 


静态 树 表 是 把 有 序 的 静态 查找 表 根据 数据 被 查找 的 概率 生成 一 棵 二 叉 树 (在 c6-2. h 中 
定义 ) ,使 得 从 二 叉 树 的 根 结 点 起 ,查找 左右 子 树 的 概率 大 致 相等 ,使 平均 查找 长 度 较 短 。 若 
每 个 数据 的 查找 概率 相等 ,直接 使 用 折 半 法 即 可 ,不 必 生 成 二 叉 树 。 


// func8-3. cpp 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 

typedef char KeyType; // 定义 关键 字 域 为 字符 型 

struct ElemType // 数据 元 素 类 型 ( 见 图 8-7) ElemType 

{ KeyType key; // 关键 字 key | weight 
wigbEgA/ 权 从 图 8-7 数据 元 素 类 弄 

}s 

void Visit(ElemType c) // Traverse() 调 用 的 与 之 配套 的 访问 数据 元 素 的 函数 

{ printf("(%c, %d)",c.key,c.weight); 

} 

void InputFromFile(FILE#f,ElemType &c) // 与 之 配套 的 从 文件 输入 数据 元 素 的 函数 

{ fscanf(f,"% x*c%c%d",&c.key,&c. weight); // % *c 吃 掉 回 车 符 

} 

void InputKey(KeyType &k) // 与 之 配套 的 由 键盘 输入 关键 字 的 函数 

{ scanf("%c",&k); 

} 


// algo8-3. cpp 静态 查找 表 (静态 树 表 ) 的 操作 ,包括 算法 9.3 和 算法 9.4 

间 include"cl.h" 

间 include"func8-3.cpp" // 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 

间 include"c8-1.h" // 静态 查找 表 的 顺序 存储 结构 

间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 

# include"bo8-1.cpp"// 静态 查找 表 (顺序 表 和 有 序 表 ) 的 基本 操作 (7 个 ) 

typedef ElemType TElemType; // 定义 二 叉 树 的 元 素 类 型 为 数据 元 素 类 型 

间 include"c6-2.h" // 二 又 链表 的 存储 结构 

# include"bo6-2.cpp" // 包括 InitBiTree() ,DestroyBiTree() 和 InOrderTraverse() 困 数 

间 define N 100 // 静态 查找 表 的 最 大 表 长 ,设置 sw[] 数 组 用 到 

Status SecondOptimal (BiTree &T, ElemType R[] ,int sw[ |,int low,int high) 

{ // 由 有 序 表 RLlow. .high] 及 其 累计 权 值 表 sw( 其 中 sw[0] == 0) 递 归 构 造 次 优 查 找 树 T。 算 法 9.3 
int j,i= low; // 有 最 小 APi 值 的 序号 , 初 值 设 为 当 low == high( 有 序 表 仅 1 个 元 素 ) 时 的 值 
double dw = sw[high]+ sw[low- 1]; // 教科 书 式 9-13 中 的 固定 项 
double min = fabs(sw[high] - sw[lom]); // 八 Pi 的 最 小 值 . 初 值 设 为 当 low == high 时 的 值 
for(j = low+ 1;j 一 = high;+fj) // 当 low 关 high 时 ,选择 最 小 的 APi 值 

if(fabs(dw 一 sw[j]j- sw[j- 1]) 一 main) // 找到 小 于 min 的 值 
{ 并 =j; // 更 新 有 最 小 APi 值 的 序号 
min = fabs(dw sw[j]- sw[j-1]); // 更 新 APi 的 最 小 值 
} 
if(1(T= (BiTree)malloc(sizeof(BiTNode)))) // 生成 结 点 失败 
return ERROR; 


了 -data= R[i]; // 将 有 最 小 APi 值 的 数据 元 素 赋 给 树 结 点 的 数据 域 
if(i== low) // 有 最 小 APi 值 的 序号 是 最 小 序号 
T->Ilchild= NULL; // 设 左 子 树 空 
else // 有 最 小 APi 值 的 序号 不 是 最 小 序号 
SecondOptimal(T -二 lchild,R,sw,low,i-1); // 递归 构造 次 优 查找 左 子 树 
if(i== high) // 有 最 小 APi 值 的 序号 是 最 大 序号 
了 -之 rchild = NULL; // 设 右 子 树 空 
else // 有 最 小 APi 值 的 序号 不 是 最 大 序号 


Secondoptimal(T -二 rchild,R,sw,i+1,high); // 递归 构造 次 优 查找 右 子 树 
return OK; 


} 
void FindSW( int sw[ |],SSTable ST) 
{ // 按照 有 序 表 ST 中 各 数据 元 素 的 Weight 域 求 累计 权 值 数组 sw,CreateSOSTree() 调 用 
int i; 
sw[0] = 0; // 置 边界 值 
printf("\nsw= 0 "); 
for(i=1;i<<= ST. length;i++ ) // 由 小 到 大 计算 累计 权 值 sw[ 记 并 输出 
{ sw[i] = sw[Li-1]+ST.elem[i].weight; // 累计 权 值 [i] = 累计 权 值 Li- 1] + [ 菇 项 权 值 
printf("%5d" ,sw[i]); 
. 
} 
typedef BiTree SOSTree; // 次 优 查 找 树 采用 二 叉 链表 的 存储 结构 
void CreateSOSTree( SOSTree &T, SSTable ST) 
{ // 由 有 序 表 ST 构造 一 棵 次 优 查 找 树 T。ST 的 数据 元 素 含 有 权 域 weight。 算 法 9.4 
int sw[N+1]; // 累计 权 值 数组 
if(ST. length == 0) // ST 是 空 表 
T=NULL; // 次 优 查找 树 T 为 空 
else // ST 不 空 
{ FindSWCsw,ST);，// 按照 有 序 表 ST 中 各 数据 元 素 的 weight 域 求 累计 权 值 表 sw 
SecondOptimal(T,ST. elem, sw,1 ,ST. length) ; 
// 由 有 序 表 ST[1. .ST. length] 及 其 累计 权 值 表 sw( 其 中 sw[0] == 0) 递 归 构 造 次 优 查找 树 T 
} 
b 
Status Search SOSTree(SOSTree &T.KeyType key) 
{ // 在 次 优 查 找 树 了 中 查找 主 关键 字 等 于 key 的 元 素 。 找 到 则 返回 Ok,T 指 向 该 元 素 ; 否则 返回 FALSE 
while(T) // T 非 空 
if(T->data. key == key) // 树 T 根 结 点 关键 字 域 的 值 等 于 key 
return OK; // 找到 ,返回 OK 
else if(T->>data.key>key) // 树 T 根 结 点 关键 字 域 的 值 大 于 key 
T=T->lchild; // 了 指向 了 的 左 子 树 ,继续 查找 
else // 树 T 根 结 点 关键 字 域 的 值 小 于 key 
T= 了 -之 rchild; // 了 指向 了 的 右 子 树 ,继续 查找 
return FALSE; // 次 优 查 找 树 了 中 不 存在 待 查 元 素 
} 
void main() 
{ 
SSTable st; 


数据 结构 算法 解析 


SOSTree t; 

Status i; 

KeyType s; 

Creat_OrdFromFile(st,"f8-3.txt"); // 由 数据 文件 产生 非 降序 静态 查找 表 st( 见 图 8-8) 
printf(" "); 


Traverse(st,Visit); // 顺序 输出 非 降 序 静 态 查 找 表 st 
CreateSOSTree(t,st); // 由 有 序 表 st 构造 次 优 查 找 树 t( 见 图 8-9) 
printf("\n 请 输入 待 查找 的 字符 : ")， 
InputKey(s); // 由 键盘 输入 关键 字 s, 在 func8-3. cpp 中 
i= Search_SOSTree(t,s); // 在 次 优 查找 树 t+ 中 查找 主 关键 字 等 于 s 的 元 素 
证 (Gi) // 找到 ,返回 OK,t 指向 该 元 素 
printf("%c 的 权 值 是 %dNn" ,s,t- 二 data.weight); 
else // 未 找到 ,返回 FALSE 
printf(" 表 中 不 存在 此 字符 \n"); 
DestroyBiTree(t); // 查找 完毕 ,销毁 次 优 查找 树 t 
} 


数据 文件 {8-3. txt 内 容 如 下 (以 教科 书 例 9-1 的 数据 为 例 ): 
[9] 
[8] 
[w] 
[6] t 
[5] 


外 (ER 

0] 

中 CD 下 

站 CDCDGDQD 
CD 


图 8-8 产生 的 非 降序 静态 查找 表 st 图 8-9 产生 的 次 优 查 找 树 t 


9 
Al 
B 1 
C2 
D5 
E3 
了 4 
G4 
H3 
ES 


程序 运行 结果 : 


(A,.1) (B,1) (C,2) (D,5) (E.3) (F,4) (G,4) (H,3) (I,5) 
sw=0 1 A 4 9 ES 16 20 23 28 
请 输入 待 查找 的 字符 : 6 
G 的 权 值 是 4 


82 动态 查找 表 


动态 查找 表 在 查找 过 程 中 可 改变 表 中 的 数据 , 即 可 插入 或 删除 数据 , 故 一 般 采 用 链 式 存 
储 结构 。 它 适合 用 于 数据 经 常 变动 的 表 , 如 飞机 航班 的 旅客 信息 表 等 。 


821 二 叉 排序 树 和 平衡 二 叉 树 


// func8-4. cpp 包括 算法 9.5(a) 和 bo6-2. cpp,algo8-4.cpp 和 algo8-5.cpp 调用 
# include"bo6-2.cpp" // 包括 InitBiTree() ,DestroyBiTree() 和 InOrderTraverse() 困 数 
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间 define InitDSTable InitBiTree // 构造 二 叉 排 序 树 和 平衡 二 叉 树 与 初始 化 二 叉 树 的 操作 同 
提 define DestroyDSTable DestroyBiTree // 销毁 二 又 排序 树 和 平衡 二 叉 树 与 销毁 二 叉 树 的 操作 同 
define TraverseDSTable InOrderTraverse 
// 按 关键 字 顺序 遍历 二 又 排序 树 和 平衡 二 叉 树 与 中 序 遍 历 二 叉 树 的 操作 同 
BiTree SearchBST(BiTree T.KeyType key) 
// 在 根 指针 了 所 指 二 又 排序 树 或 平衡 二 又 树 中 递归 地 查找 某 关键 字 等 于 key 的 数据 元 素 ， 
// 若 查找 成 功 , 则 返回 指向 该 数据 元 素 结 点 的 指针 ,否则 返回 空 指针 。 算 法 9. 5(a) 
庄 (!T||PQCkey,T- 盖 data.key)) // 树 了 空 或 待 查找 的 关键 字 等 于 了 所 指 结 点 的 关键 字 
return T; // 查找 结束 ,返回 指针 了 
else if LT(key,T -data. key) // 待 查找 的 关键 字 小 于 了 所 指 结 点 的 关键 字 
return SearchBST(T -过 lchild,key); // 在 左 子 树 中 继续 递归 查找 
else // 待 查找 的 关键 字 大 于 了 所 指 结 点 的 关键 字 
return SearchBST(T -二 rchild,key); // 在 右 子 树 中 继续 递归 查找 


// bo8-2. cpp 二 叉 排 序 树 的 基本 操作 (4 个 ), 包 括 算法 9.5(b) ,算法 9.6 一 算法 9.8 
Status SearchBST(BiTree &T. KeyType key.BiTree f.BiTree&p) // 算法 9.5(b) 
{ // 在 根 指针 了 所 指 二 叉 排 序 树 中 递归 地 查找 其 关键 字 等 于 key 的 数据 元 素 , 若 查找 成 功 ， 
// 则 指针 p 指向 该 数据 元 素 结 点 ,并 返回 TROE, 和 否则 指针 p 指向 查找 路 径 上 访问 的 最 后 一 个 结 点 
// 并 返回 FALSE, 指 针 f 指 向 了 的 双亲 ,其 初始 调用 值 为 NULL 
if(1T) // 查找 不 成 功 
{ p=f; //p 指 向 查找 路 径 上 访问 的 最 后 一 个 结 点 
return FALSE; 
} 
else if EQO(key,T- 二 data.key) // 查找 成 功 
{ p=T; // p 指 向 该 数据 元 素 结 点 
return TRUE; 
} 
else if LT(key,T- 二 data.key) // key 小 于 T 所 指 结 点 的 关键 字 
return SearchBST(T -二 lchild,key,T,p); // 在 左 子 树 中 继续 递归 查找 
else // key 大 于 了 所 指 结 点 的 关键 字 
return SearchBST(T -二 rchild,key,T,p); // 在 右 子 树 中 继续 递归 查找 
} 
Status InsertBST(BiTree &T. ElemType e) 
{ // 车 二 又 排 序 树 了 中 没有 关键 字 等 于 e.key 的 元 素 , 插 入 e 并 返回 TRUE; 否则 返回 FALSE。 算 法 9.6 
BiTree p,s; 
if(1SearchBST(T,e. key,NULL,p)) // 查找 不 成 功 ,p 指向 查找 路 径 上 访问 的 最 后 一 个 叶子 结 点 
{ s= (BiTree)malloc(sizeof(BiTNode)); // 生成 新 结 点 
s -data= e; // 给 新 结 点 的 数据 域 赋值 
s -lchild = s->rchild= NULL; // 给 新 结 点 的 左右 孩子 域 赋 初 值 空 
if(1p) // 树 T 空 
T= s; // 待 插 结 点 * s 为 新 的 根 结 点 
else if LT(e.key,p- 二 data.key) // 树 T 不 空 , * s 的 关键 字 小 于 *p 的 关键 字 
p->1lchild= s; // 待 插 结 点 * s 为 p 所 指 结 点 的 左 孩 子 
else // 树 T 不 空 , * s 的 关键 字 大 于 * p 的 关键 字 


数据 结构 算法 解析 


p->rchild= s; // 待 插 结 点 * s 为 p 所 指 结 点 右 孩 子 
return TRUE ; 
} 
else 
return FALSE; // 树 中 已 有 关键 字 相同 的 结 点 .不 再 插入 
} 
void Delete( BiTree &p) 
{ // 从 二 叉 排 序 树 中 删除 p 所 指 结 点 ,并重 接 它 的 左 或 右 子 树 。 算 法 9.8 
BiTree s,q= p; // q 指 向 待 删除 结 点 ( 提 到 if 语句 之 外 ) 
证 (!p- 二 rchild) // p 的 右 子 树 空 则 只 须 重 接 它 的 左 子 树 ( 待 删 结 点 是 叶子 也 走 此 分 支 )( 见 图 8-10) 
{ p=p->lchild; // p 指 向 待 删除 结 点 的 左 孩 子 
free(q); // 释放 待 删除 结 点 
} 
else if(1p -二 lchild) // p 的 左 子 树 空 ,只 须 重 接 它 的 右 子 树 ( 见 图 8-11) 
{ p=p->rchild; // p 指 向 待 删除 结 点 的 右 孩 子 


p p 
(a) 初 态 (b) p 指 向 待 删 结 ”(c) 释放 待 删 结 点 (a) 初 态 (b) p 指 向 待 删 结 〈c) 释放 待 删 结 点 
点 的 左 孩子 点 的 右 孩子 
图 8-10” 待 删 结 点 右 子 树 空 的 情况 图 8-11 待 删 结 点 左 子 树 空 的 情况 


free(q); // 释放 待 删除 结 点 
} 
else // p 的 左右 子 树 均 不 空 
{ s=p->lchild; // s 指向 待 删除 结 点 的 左 孩子 (s 由 p 转 左 ) 
while(s -二 rchild) // s 有 右 孩 子 
{ q=s;//q 指 向 s 
s=s->rchild; // s 指向 s 的 右 孩 子 
} // s 向 右 到 尽头 (s 指向 待 删 结 点 的 前 驱 结 点 ,q 指向 s 的 双亲 结 点 ) 
p -data= s -data; // 将 待 删 结 点 前 驱 的 值 取代 待 删 结 点 的 值 
if(ql=p) // 情况 @ , 待 删 结 点 的 左 孩子 有 右 子 树 ( 见 图 8-12) 
q- 二 rchild= s- 二 lchild; // 重 接 * q 的 右 子 树 
else // 情况 @, 待 删 结 点 的 左 孩 子 没有 右 子 树 ( 见 图 8-13) 
q->lchild= s ->lchild; // 重 接 *q 的 左 子 树 
free(s); // 释放 s 所 指 结 点 


} 

Status DeleteBST(BiTree &T. KeyType key) 

{ // 若 二 又 排 序 树 了 中 存在 关键 字 等 于 key 的 数据 元 素 时 , 则 删除 
// 该 数据 元 素 结 点 ,并 返回 TRUE; 否则 返回 FALSE。 算 法 9.7 


待 删 结 点 的 
前 驱 结 点 


待 删 结 点 的 
前 驱 结 点 


(a) 初 态 (b) s 指 向 待 删 结 点 的 前 驱 ， (©) q 的 右 孩子 为 s 的 左 孩子 (d) 删除 s 所 指 结 点 
9 指向 前 驱 的 双亲 


图 8-12 情况 O , 待 删 结 点 的 左右 子 树 均 不 空 , 且 左 孩子 有 右 子 树 


待 删 结 点 的 
前 驱 结 点 和 2 


(a) 初 态 (b) q 的 左 孩 子 为 的 左 孩子 (0) 删除 s 所 指 结 点 
图 8-13 情况 @, 待 删 结 点 的 左右 子 树 均 不 空 ,但 左 孩子 没有 右 子 树 


i£(1T) // 树 T 空 
return FALSE; 
else // 树 T 不 空 
{ if POCOkey,T- 二 data.key) // 关键 字 等 于 树 T 根 结 点 的 关键 字 
Delete(T); // 删除 该 结 点 
else if LT(key,T- 二 data.key) // 关键 字 小 于 T 所 指 结 点 的 关键 字 
DeleteBST(T -二 lchild,key); // 在 T 的 左 孩 子 中 递归 查找 
else // 关键 字 大 于 T 所 指 结 点 的 关键 字 
DeleteBST(T -二 rchild,key); // 在 T 的 右 孩 子 中 递归 查找 
return TRUE; 


// func8-5. cpp 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 

typedef int KeyType; // 定义 关键 字 类 型 为 整 型 

struct ElemTYpe // 数据 元 素 类 型 ( 见 图 8-14) ElemType 
{ KeyType key; // 关键 字 key | others 


int others; // 其 他 数据 图 8-14 数据 元 素 类 型 
1 


数据 结构 算法 解析 


void Visit(ElemType c) // Traverse() 调 用 的 与 之 配套 的 访问 数据 元 素 的 函数 

{ printf("(%d,%d)",c.key,c.others); 

} 

void InputFromFile(FILE ¥#f,ElemType &c) // 与 之 配套 的 从 文件 输入 数据 元 素 的 函数 
{ fscanf(f,"%d%d",g&c.key,&c. others); 

} 

void InputKey(KeyType &k) // 与 之 配套 的 由 键盘 输入 关键 字 的 函数 

{ scanf("%d",&k); 

} 


// algo8-4. cpp 检验 bo8-2.cpp 的 程序 
间 include"cl.h" 
间 include"func8-5.cpp" // 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 
并 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 
typedef ElemType TElemType; // 定义 二 叉 树 的 元 素 类 型 为 数据 元 素 类 型 
提 include"c6-2.h" // 二 叉 链表 的 存储 结构 
间 include"func8-4.cpp" // 包括 算法 9.5(a) 和 bo6-2. cpp 
间 include"bo8-2.cpp" // 二 叉 排序 树 的 基本 操作 (4 个 ), 包 括 算法 9.5(b) 和 算法 9.6 一 算法 9.8 
void main() 
{ 
BiTree dt,p; 
int i,n; 
KeyType j; 
ElemType r; 
Status k; 
FILE x f; // 文件 指针 类 型 
f= fopen("f8-4.txt","r"); // 打开 数据 文件 f8-4. txt 
fscanf(f,"%d",&n); // 由 数据 文件 输入 数据 元 素 个 数 
InitDSTable(dt); // 构造 空 二 又 排序 树 dt 
for(i=0;i<nii++ ) // 依次 在 二 叉 排序 树 dt 中 插入 n 个 数据 元 素 
{ InputFromFile(f,r); // 由 数据 文件 输入 数据 元 素 的 值 并 赋 给 =, 在 func8-5. cpp 中 
k= InsertBST(dt,r); // 依次 将 数据 元 素 z 插 人 二 又 排序 树 dt 中 
if(1k) // 插入 数据 元 素 r 失败 
printf(" 二 叉 排序 树 dt 中 已 存在 关键 字 为 %d 的 数据 , 故 (%d, %d) 无 法 插入 到 dt 中 。\n"， 
r.Kkey,r. key,r. others); 
} 
fclose(f); // 关闭 数据 文件 
printf(" 中 序 遍 历 二 又 排序 树 dt: \n"); 
TraverseDSTable(dt,Visit); // 中 序 遍历 二 叉 排序 树 此 ,确定 dt 是 否 排序 
printf("\n 先 序 遍 历 二 又 排序 树 dt: \n"); 
PreOrderTraverse(dt,Visit); // 先 序 遍历 二 又 排序 树 dt, 确 定 dt 的 形态 
printf("\n 请 输入 待 查找 的 关键 字 的 值 : "); 
InputKey(j); // 由 键盘 输入 关键 字 j. 在 func8-5. cpp 中 
p= SearchBST(dt,j); // 在 dt 中 递归 地 查找 关键 字 等 于 j 的 结 点 
证 (p) // 找到 ,p 指向 该 结 点 


printf("dt 中 存在 关键 字 为 %d 的 结 点 。",]j); 
DeleteBST(dt,j); // 在 dt 中 删除 关键 字 等 于 j 的 结 点 
printf(" 删 除 此 结 点 后 ,中 序 遍 历 二 叉 排序 树 dt: \n"); 
TraverseDSTable(dt,Visit); // 中 序 遍 历 二 叉 排序 树 dt ,确定 dt 是 否 排 序 
printf("\n 先 序 遍历 二 又 排序 树 dt: \n"); 
PreOrderTraverse(dt,Visit); // 先 序 遍历 二 叉 排序 树 dt, 确 定 dt 的 形态 
printf("\n"); 

} 

else // 未 找到 ,p 为 空 

printf("dt 中 不 存在 关键 字 为 %d 的 结 点 。\n" ,j); 

DestroyDSTable(dt); // 销毁 二 又 排序 树 dt 

} 


f8-4. txt 内 容 如 下 : 


12 
371 
122 
-| 
904 
1005 
24 6 
53 7 
78 8 
61 9 
70 10 
45 11 
53 12 


程序 运行 结果 : 


二 叉 排序 树 dt 中 已 存在 关键 字 为 53 的 数据 , 故 (53,12) 无 法 插入 到 dt 中 。 

中 序 遍 历 二 叉 排序 树 此 : ( 见 图 8-15) 
(3,3)(12,2)(24,6)(37,1)(45,11)(53,7)(61,9)(70.10)(78,8)(90,4)(100,5) 

先 序 遍 历 二 叉 排 序 树 dt: 
(37,1)(12,2)(3,3)(24,6)(90,4)(53.7)(45,11)(78,8)(61,9)(70,10)(100,5) 

请 输入 待 查找 的 关键 字 的 值 : 9Ox 

dt 中 存在 关键 字 为 90 的 结 点 。 删 除 此 结 点 后 ,中 序 遍 历 二 又 排序 树 dt: ( 见 图 8-16) 
(3,3)(12,2)(24,6)(37,1)(45,11)(53,7)(61,9)(70,10)(78,8)(100,5) 

先 序 遍历 二 叉 排序 树 dt: 
(37,1)(12,2)(3,3)(24,6)(78,8)(53.7)(45,11)(61.9)(70,10)(100,5) 


二 叉 排序 树 中 任何 一 个 结 点 ,其 左 子 树 上 所 有 结 点 的 关键 字 值 均 小 于 该 结 点 的 关键 字 
值 ; 其 右 子 树 上 所 有 结 点 的 关键 字 值 均 大 于 该 结 点 的 关键 字 值 。 中 序 遍 历 二 又 排 序 树 可 得 
到 按 关键 字 有 序 的 序列 。 通 过 中 序 和 先 序 (或 中 序 和 后 序 ) 遍 历 二 又 排序 树 , 就 可 以 确定 二 
又 排序 树 的 形态 。 
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图 8-15 由 文件 产生 的 二 叉 排序 树 dt 图 8-16 删除 90 后 的 二 叉 排序 树 dt 


在 二 又 排序 树 中 插入 一 个 结 点 ,这 个 结 点 总 是 叶子 结 点 。 删 除 一 个 结 点 从 算法 上 分 有 
2 种 情况 : 待 删 结 点 至 多 有 一 棵 子 树 ; 待 删 结 点 有 两 棵 子 树 。 如 果 待 删 结 点 至 多 有 一 棵 子 
树 , 则 待 删 结 点 与 它 的 双亲 结 点 和 至 多 存在 的 唯一 的 ( 左 或 右 ) 孩 子 结 点 形成 单 链 表 结 构 ,如 
图 8-10 和 图 8-11 所 示 。 只 要 将 其 双亲 结 点 原来 指向 其 的 指针 指向 其 唯一 的 孩子 结 点 ( 若 
待 删 结 点 是 叶子 结 点 , 则 指 空 ) ,就 从 二 叉 排序 树 中 将 其 删除 了 ,同时 仍然 保持 二 又 排序 树 的 
有 序 性 。 如 果 待 删 结 点 的 两 棵 子 树 都 存在 ,删除 其 需 重 接 两 棵 子 树 ,是 比较 麻烦 的 。 故 采用 
变通 的 方法 : 查找 待 删 结 点 的 前 驱 结 点 ,这 个 结 点 是 待 删 结 点 左 子 树 的 最 右 结 点 , 它 没有 右 
子 树 。 把 这 个 结 点 的 值 赋 给 待 删 结 点 ,相当 于 删除 了 待 删 结 点 ,但 却 在 同一 位 置 增加 了 一 个 
前 驱 结 点 ,这 样 就 有 了 两 个 相 邻 的 前 驱 结 点 。 再 把 原来 的 前 驱 结 点 删除 即 可 。 原 来 的 前 驱 
结 点 至 多 有 一 棵 子 树 ,删除 它 是 很 容易 的 。 这 样 做 仍 保持 了 二 叉 排 序 树 的 有 序 性 。 图 8-12 
和 图 8-13 分 别 就 待 删 结 点 的 左 孩 子 是 否 有 右 子 树 两 种 情况 的 算法 做 了 说 明 。 再 来 分 析 
图 8-15 和 图 8-16 这 个 实际 例子 : 图 8-15 中 关键 字 为 90 的 结 点 有 左右 两 棵 子 树 ,为 了 删除 
它 , 首 先 找 到 它 的 前 驱 结 点 78, 将 结 点 78 的 值 赋 给 结 点 90, 再 删除 结 点 78。 图 8-16 显示 了 
删除 后 的 结果 ,仍然 是 一 棵 二 又 排序 树 。 当 然 ,对 称 地 ,也 可 以 利用 待 删 结 点 的 后 继 结 点 ( 它 
是 待 删 结 点 右 子 树 的 最 左 结 点 ) 来 处 理 这 个 问题 。 

二 叉 排序 树 的 形态 与 数据 元 素 插入 的 顺序 有 关 。 图 8-17 显示 了 三 种 由 1、2、3 三 个 数 
据 元 素 组 成 的 二 又 排 序 树 。 当 3 个 数据 元 素 的 输入 顺序 不 同 ,生成 了 3 棵 不 同 的 二 又 排 
序 树 。 


如 果 数据 输入 的 顺序 不 当 , 二 又 排序 ® 

树 的 深度 有 可 能 很 深 ,导致 平均 查找 长 度 

很 大 ,失去 了 二 叉 排 序 树 存在 的 意义 。 平 2 oO 

衡 二 又 树 ( 它 也 是 排序 树 ) 克 服 了 二 又 排序 G 人 亲 

树 的 这 个 缺点 , 它 通过 当 左 右 子 树 的 深度 “四 输 和 321 站 A 


差 大 于 1 时 调换 根 结 点 ,使 树 的 深度 尽量 
浅 ,同时 仍 保持 排序 特性 。 


// c8-3.h 平衡 二 叉 树 的 存储 结构 。 在 教科 书 第 236 页 ( 见 图 8-18) 
typedef struct BSTNode 


图 8-17 由 1,2,3 组 成 的 三 棵 二 又 排 序 树 
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{ ElemType data; // 结 点 的 值 
int bf; // 结 点 的 平衡 因子 , 比 二 又 树 结构 多 此 项 
BSTNode x lchild, x rchild; // 左右 孩子 指针 
}BSTNode, * BSTree; 


BSTNode 
lchild | data [bf | rchild 


图 8-18 平衡 二 又 树 类 型 存储 结构 


// bo8-3. cpp 平衡 二 叉 树 的 基本 操作 ,包括 算法 9.9 一 算法 9. 12 

void R_Rotate(BSTree &p) 

// 对 以 * p 为 根 的 二 又 排序 树 作 右 旋 处 理 , 使 二 又 排序 树 的 重心 右 移 ,但 不 修改 平衡 因子 。 

// 处 理 之 后 p 指 向 新 的 树 根 结 点 , 即 旋转 处 理 之 前 的 左 子 树 的 根 结 点 。 算 法 9.9( 见 图 8-19) 

BSTree 1c; 

lc=p- 盖 lchild; // lc 指向 p 的 左 孩子 结 点 ,1c 的 左 子 树 不 变 

p- 二 lchild= lc -rchild; // 1c 的 右 子 树 挂 接 为 p 的 左 子 树 

lc->rchild= p; // 原 根 结 点 成 为 lc 的 右 孩 子 

p=1c; // p 指 向 原 左 孩子 结 点 (新 的 根 结 点 ) 

} 

void L Rotate(BSTree &p) 

{ // 对 以 *p 为 根 的 二 叉 排序 树 作 左旋 处 理 , 使 二 叉 排序 树 的 重心 左 移 , 但 不 修改 平衡 因子 。 
// 处 理 之 后 p 指向 新 的 树 根 结 点 , 即 旋转 处 理 之 前 的 右 子 树 的 根 结 点 。 算 法 9.10( 见 图 8-20) 
BSTree rc; 
rc=p- 记 rchild; // rc 指向 p 的 右 孩 子 结 点 ,rc 的 右 子 树 不 变 
p- 二 rchild= rc- 二 lchild; // rc 的 左 子 树 挂 接 为 p 的 右 子 树 
rc -lchild=p; // 原 根 结 点 成 为 rc 的 左 孩 子 
p=rci //P 指 向 原 右 孩子 结 点 (新 的 根 结 点 ) 


p p p 
i (R 
lc 
似 丰 诈 风 多 左旋 QR ”人 凤 
OR RR \ 
(a) 右 旋 前 (b) 右 旋 后 (a) 左旋 前 (b) 左旋 后 
图 8-19 调用 R_Rotate() 图 8-20 调用 L_Rotate() 


void LR Rotate(BSTree &p) 

{ // 对 以 *P 为 根 的 平衡 二 又 树 的 LR 型 失衡 ,直接 进行 平衡 旋转 处 理 ,不 修改 平衡 因子 
BSTree lc=p- 二 1lchild; // 1c 指向 小 值 结 点 
p- 二 lchild= lc->rchild->rchild; // 中 值 结 点 的 右 子 树 成 为 大 值 结 点 的 左 子 树 
lc->rchild->rchild= p; // 大 值 结 点 成 为 中 值 结 点 的 右 子 树 
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pP= lc->rchild; // 根 指针 指向 中 值 结 点 
lc -rchild= plchild; // 中 值 结 点 的 左 子 树 成 为 小 值 结 点 的 右 子 树 
p->lchild= lc; // 小 值 结 点 成 为 中 值 结 点 的 左 子 树 

} 

void RL Rotate(BSTree &p) 

{ // 对 以 *p 为 根 的 平衡 二 叉 树 的 RL 型 失衡 ,直接 进行 平衡 旋转 处 理 , 不 修改 平衡 因子 
BSTree rc= prchild; // rc 指向 大 值 结 点 
p->rchild= rc -lchild -lchild; // 中 值 结 点 的 左 子 树 成 为 小 值 结 点 的 右 子 树 
rc -lchild -lchild = p; // 小 值 结 点 成 为 中 值 结 点 的 左 子 树 
p=rc->lchild; // 根 指针 指向 中 值 结 点 
rc -之 lchild= p>rchild; // 中 值 结 点 的 右 子 树 成 为 大 值 结 点 的 左 子 树 
pP->rchild= rc; // 大 值 结 点 成 为 中 值 结 点 的 右 子 树 

} 

间 define LH +1 // 左 高 。 在 教科 书 第 236 页 

提 define EFH 0 // 等 高 

提 define RH -1 // 右 高 

void LeftBalance(BSTree &T) // 算法 9.12 

{ // 初始 条 件 : 原本 平衡 二 又 排 序 树 了 的 左 子 树 比 右 子 树 高 (T- 二 bf = 1)， 


// 又 在 左 子 树 中 插入 了 结 点 ,并 导致 左 子 树 更 高 ,破坏 了 树 了 的 平衡 性 
// 操作 结果 : 对 不 平衡 的 树 T 作 左 平 衡 旋转 处 理 , 使 树 T 的 重心 右 移 ， 
// 实现 新 的 平衡 。 本 算法 结束 时 ,T 指向 新 的 平衡 二 叉 树 根 结 点 


BSTree lc,rd; 
lc=T- 二 lchild; // lc 指向 * 了 的 左 孩 子 结 点 
switch(lc -二 bf) // 检查 *T 的 左 子 树 的 平衡 度 ,并 作 相 应 平衡 处 理 
{ case LH: // 新 结 点 插入 在 *T 的 左 孩 子 的 左 子 树 上 ,导致 左 子 树 的 平衡 因子 为 左 高 ， 
// 形成 LL(/) 型 不 平衡 ,要 作 单 右 旋 处 理 ( 见 图 8-21) 
T->bf = 1c -之 bf = EH; // 旋转 后 , 原 根 结 点 和 左 孩 子 结 点 (新 根 结 点 ) 的 平衡 因子 都 为 0 
R_Rotate(T); // 对 树 了 作 右 旋 处 理 ,使 树 T 了 的 重心 右 移 
break; 
case RH: // 新 结 点 插入 在 * 了 的 左 孩 子 的 右 子 树 上 ,导致 左 子 树 的 平衡 因子 为 右 高 ， 
// 形成 LR( 二 ) 型 不 平衡 ,要 作 双 旋 处 理 ( 见 图 8-22(a)) 
rd=1c -之 rchild; // rd 指向 *T 的 左 孩子 的 右 子 树 根 结 点 
switch(rd -二 bf) // 检查 *T 的 左 孩子 的 右 子 树 的 平衡 度 , 修 改 *T 及 其 左 孩子 的 平衡 因子 


TT T 
内 公 0 
已 烛 业内 
局 (RN (RB ORG 
(WD 由 (D 
MM (a) 旋转 前 左 重 。 (b) 左 子 树 左旋 (0) T 右 旋 


图 8-21 LL 型 平衡 旋转 图 8-22 ”LR 型 平衡 旋转 
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{ case LH: // 新 结 点 插入 在 *T 的 左 孩 子 的 右 子 树 的 左 子 树 上 (情况 四 , 见 图 8-23(a)) 

T- 盖 bf = RH; // 旋转 后 , 原 根 结 点 的 平衡 因子 为 右 高 
lc->bf= 了 PH; // 旋转 后 , 原 根 结 点 的 左 孩 子 结 点 平衡 因子 为 等 高 
break; 

case EH: // 新 结 点 插 和 人 为 *T 的 左 孩子 的 右 孩 子 ( 叶 子 )( 情 况 回 , 见 图 8-23(b)) 
T 了 ->bf = 1c ->bf = EH; // 旋转 后 , 原 根 和 左 孩子 结 点 的 平衡 因子 都 为 等 高 
break; 

case RH: // 新 结 点 插入 在 * 了 的 左 孩子 的 右 子 树 的 右 子 树 上 (情况 加 , 见 图 8-23(c)) 
T 了 -之 bf = PH; // 旋转 后 , 原 根 结 点 的 平衡 因子 为 等 高 
lc->bf=LH; // 旋转 后 , 原 根 结 点 的 左 孩 子 结 点 平衡 因子 为 左 高 


rd pl nd 
(OY WO A 
(人 nh-2| |h-2 
新 插 结 点 新 插 结 点 新 插 结 点 
(a) 情况 @ (b) 情况 @ (0) 傅 况 @ 


图 8-23 ”LR 型 平衡 旋转 3 种 情况 平衡 因子 变化 


rd ->bf = EH; // 旋转 后 的 新 根 结 点 (< 了 T 的 左 孩子 的 右 孩 子 结 点 ) 的 平衡 因子 为 等 高 
提 ifndef FLAG // 没 定义 FLAG, 使 用 2 个 函数 实现 双 旋 处 理 , 同 教科 书 
L Rotate(T->1child); 
// 对 *T 的 左 子 树 作 左旋 处 理 ,使 * 了 成 为 LL(/) 型 不 平衡 ( 见 图 8-22(b)) 
R_Rotate(T); // 对 *T 作 右 旋 处 理 ( 见 图 8-22(c)) 
间 else // 定义 了 FLRAG, 直 接 处 理 LR 型 不 平衡 
LR_Rotate(T); // 对 *T 直 接 进 行 平衡 旋转 处 理 
endif 
} 
} 
void RightBalance(BSTree &T) 
{ // 初始 条 件 : 原本 平衡 二 叉 排 序 树 了 的 右 子 树 比 左 子 树 高 (T -bf =- 1) ,又 在 右 子 树 中 插入 了 结 点 ， 


Md 并 导致 右 子 树 更 高 ,破坏 了 树 了 的 平衡 性 
// 操作 结果 : 对 不 平衡 的 树 了 作 右 平衡 旋转 处 理 . 使 树 了 的 重心 左 移 , 实 现 新 的 平衡 。 
内 本 算法 结束 时 .T 指 向 新 的 平衡 二 又 树 根 结 点 


BSTree rc,1d; 
rc=T- 盖 rchild; // rc 指向 *T 的 右 孩 子 结 点 
switch(rc -bf) // 检查 * 了 的 右 子 树 的 平衡 度 .并 作 相 应 平衡 处 理 
{ case RH: // 新 结 点 插入 在 * 了 T 的 右 孩 子 的 右 子 树 上 ,导致 右 子 树 的 平衡 因子 为 右 高 ， 
// 形成 RRC\) 型 不 平衡 ,要 作 单 左旋 处 理 ( 见 图 8-24) 
T->bf = rc ->bf = EH; // 旋转 后 . 原 根 结 点 和 右 孩 子 结 点 (新 根 结 点 ) 的 平衡 因子 都 为 0 
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EL_Rotate(T); // 对 树 T 作 左旋 处 理 , 使 树 T 的 重心 左 移 
break; 

case LH: // 新 结 点 插入 在 * 了 的 右 孩 子 的 左 子 树 上 ,导致 右 子 树 的 平衡 因子 为 左 高 ， 
// 形成 RL( 二 ) 型 不 平衡 ,要 作 双 旋 处 理 ( 见 图 8-25(a)) 


T 
@ @ | 
风 号 ”多 
志 由 惟 (DQ (R 
(WR (RY 
(a) 旋转 前 右 重 。“”(b) 右 子 树 右 旋 (c) T 左 旋 
图 8-24 ”RR 型 平衡 旋转 图 8-25 ”RL 型 平衡 旋转 


ld=rc->1lchild; // ld 指向 *T 的 右 孩 子 的 左 子 树 根 结 点 
switch(1d- 盖 bf) // 检查 *T 的 右 孩 子 的 左 子 树 的 平衡 度 ,修改 * 了 及 其 右 孩 子 的 平衡 因子 
{ case RH: // 新 结 点 插入 在 *T 的 右 孩 子 的 左 子 树 的 右 子 树 上 (情况 四 , 见 图 8-26(a)) 
T->bf=LH; // 旋转 后 , 原 根 结 点 的 平衡 因子 为 左 高 
rc -之 bf = EH; // 旋转 后 , 原 根 结 点 的 右 孩 子 结 点 平衡 因子 为 等 高 
break; 
case EH: // 新 结 点 插入 为 *T 的 右 孩 子 的 左 孩子 (叶子 )( 情 况 加, 见 图 8-26(b)) 
T->bf = rc ->bf = EH; // 旋转 后 , 原 根 和 右 孩 子 结 点 的 平衡 因子 都 为 等 高 
break; 
case LH: // 新 结 点 插入 在 *T 的 右 孩 子 的 左 子 树 的 左 子 树 上 (情况 回 , 见 图 8-26(c)) 
T->bf = EH; // 旋转 后 , 原 根 结 点 的 平衡 因子 为 等 高 
rc -之 bf = RH; // 旋转 后 , 原 根 结 点 的 右 孩 子 结 点 的 平衡 因子 为 右 高 


新 插 结 点 
(a) 情况 四 


(b) 情况 @ (0) 情况 @ 
图 8-26 ”RL 型 平衡 旋转 3 种 情况 平衡 因子 变化 
1d ->bf = EH; // 旋转 后 的 新 根 结 点 (* 了 的 右 孩 子 的 左 孩 子 结 点 ) 的 平衡 因子 为 等 高 
间 ifndef FLAG // 没 定义 FLAG, 使 用 2 个 函数 实现 双 旋 处 理 


R_Rotate(T 一 二 rchild); 
// 对 * 了 T 的 右 子 树 作 右 旋 处 理 , 使 *T 成 为 RRC\) 型 不 平衡 ( 见 图 8-25(b)) 


L_Rotate(T); // 对 *T 作 左旋 处 理 ( 见 图 8-25(c)) 

间 else // 定义 了 FLAG, 直 接 处 理 RL 型 不 平衡 

RL Rotate(T); // 对 * 了 直接 进行 平衡 旋转 处 理 

endif 
} 

} 

Status InsertAVL(BSTree &T.ElemType e,Boolean &taller) 

{ // 若 在 平衡 的 二 叉 排序 树 了 中 不 存在 和 e 有 相同 关键 字 的 结 点 , 则 插入 一 个 数据 元 素 为 e 的 新 结 点 ， 
// 并 返回 TRUE; 否则 返回 FALSE。 若 因 插 入 而 使 二 又 排序 树 了 失去 平衡 , 则 作 平 衡 旋转 处 理 ， 
// 布尔 变量 taller 反映 在 调用 InsertAVL() 前 后 ,T 是 否 长 高 。 算 法 9.11 
if(1T) // 树 或 子 树 T 空 
{ // 插入 新 结 点 , 树 “ 长 高 ”, 置 taller 为 TRUE 

T= (BSTree)malloc(sizeof(BSTNode)); // 生成 新 结 点 , 且 了 指向 其 
T 了 -data = e; // 给 新 结 点 赋值 
T- 之 lchild =T 了 -之 rchild = NULL; // 新 结 点 是 叶子 结 点 
T->bf = EH; // 叶子 结 点 的 平衡 因子 为 等 高 
taller = TRUE; // 以 了 为 根 结 点 的 树 长 高 了 (深度 由 0 变 为 1) ,此 信息 返回 给 T 的 双亲 结 点 
} 
else // 树 或 子 树 T 不 空 
{ if PQ(e.key,T- 盖 data.key) // 了 所 指 结 点 的 关键 字 和 e 相同 ,不 再 插入 
{ // taller = FALSE; // 树 T 保 持原 来 的 形态 ,没有 长 高 (此 句 可 省 ) 
return FALSE; // 没有 在 树 了 中 插入 结 点 的 标志 
} 
证 LT(e. key,T->data. key) // e 的 关键 字 小 于 * 了 的 关键 字 
{ if(1InsertAVL(T- 之 lchild,e,taller)) // 继续 在 *T 的 左 子 树 中 递归 调用 InsertAVL() 
return FALSE; // 如 未 插入 e, 返 回 没有 在 树 了 中 插入 结 点 的 标志 
if(taller) // 如 已 将 e 插 入 到 x 了 的 左 子 树 中 且 左 子 树 “ 长 高 ” 
switch(T -二 bf) // 检查 *T 的 平衡 度 , 并 作 适 当 处 理 
{ case LH: // 原本 树 了 的 左 子 树 比 右 子 树 高 ,现在 了 的 左 子 树 又 “长 高 > 了 
LeftBalance(T); // 对 树 T 作 左 平衡 处 理 , 使 树 T 的 重心 右 移 
taller = FALSE; // 对 T 作 左 平衡 处 理 后 , 树 T 的 深度 同 插入 结 点 e 前 ,未 长 高 
break; 
case EH: // 原本 树 了 的 左 、 右 子 树 等 高 ,现在 T 了 的 左 子 树 又 “长 高 ?了 
T 了 -之 bf = LH; // 了 的 平衡 因子 由 0 变 为 1( 左 高 ) 
taller = TRUE; // 树 T 比 插入 结 点 e 前 “长 高 "了 ,此 信息 返回 给 T 的 双亲 结 点 
break; 
case RH: T- 二 bf = EH; // 原本 树 T 的 右 子 树 比 左 子 树 高 ,现在 T 的 左 , 右 子 树 等 高 
taller = FALSE; // 树 T 没 有 长 高 ,此 信息 返回 给 T 的 双亲 结 点 


else // e 的 关键 字 大 于 * 了 的 关键 字 
{ 证 (1InsertRVL(T -二 rchild,e,taller)) // 继续 在 *T 的 右 子 树 中 进行 搜索 ,如 未 插入 
return FALSE; // 没有 在 树 了 中 插入 结 点 的 标志 
if(taller) // 已 插入 到 了 的 右 子 树 且 右 子 树 “ 长 高 ” 
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switch(T- 盖 bf) // 检查 T 的 平衡 度 
{ case LH: 了 -bf = EH; // 原本 树 T 的 左 子 树 比 右 子 树 高 ,现在 了 的 左右 子 树 等 高 
taller = FALSE; // 树 T 没 有 长 高 ,此 信息 返回 给 T 的 双亲 结 点 
break; 
case EH: // 原本 树 T 的 左 , 右 子 树 等 高 ,现在 了 的 右 子 树 又 “长 高 "了 
T->bf=RH; //T 的 平衡 因子 由 0 变 为 - 1( 右 高 ) 
taller= TRUE; // 树 T 比 插入 结 点 e 前 "长 高 "了 ,此 信息 返回 给 T 的 双亲 结 点 
break; 
case RH: // 原本 右 子 树 比 左 子 树 高 ,现在 了 的 右 子 树 又 “长 高 ?了 
RightBalance(T); // 对 树 了 作 右 平衡 处 理 , 使 树 了 的 重心 左 移 
taller = FALSE; // 对 了 作 右 平衡 处 理 后 , 树 了 的 深度 同 插入 结 点 e 前 ,未 长 高 


} 
return TRUE; 


// algo8-5. cpp 检验 bo8-3.cpp 的 程序 
间 include"cl.h" 
间 include"func8-5.cpp" // 包括 数据 元 素 类 型 的 定义 及 对 它 的 操作 
间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 
typedef ElemType TElemType; // 定义 二 叉 树 的 元 素 类 型 为 数据 元 素 类 型 
间 include"c8-3.h" // 平衡 二 叉 树 的 存储 结构 
typedef BSTree BiTree; // 定义 二 叉 树 的 指针 类 型 为 平衡 二 叉 树 的 指针 类 型 
间 include"func8-4.cpp"”// 包括 算法 9.5(a) 和 bo6-11. cpp 
// 提 define FLAG // 加 此 句 在 bo8-3.cpp 中 直接 做 RL 和 LR 平衡 处 理 。 第 9 行 
间 include"bo8-3.cpp" // 平衡 二 叉 树 的 基本 操作 
void main() 
{ 
BSTree dt,p; 
int i,n; 
KeyType j; 
ElemType r; 
Boolean flag; 
Status k; 
FILE x f; // 文件 指针 类 型 
f= fopen("f8-4.txt","r"); // 打开 数据 文件 £8-4. txt 
fscanf(f,"%d",&n); // 由 数据 文件 输入 数据 元 素 个 数 
InitDSTable(dt); // 初始 化 空 平衡 二 叉 树 dt 
for(i=0;i<n;i+t+ ) // 依次 在 平衡 二 叉 树 dt 中 插入 n 个 数据 元 素 
{ InputFromFile(f.r); // 由 数据 文件 输入 数据 元 素 的 值 并 赋 给 =, 在 func8-5.cpp 中 
k= InsertAVL(dt,r,flag); // 在 平衡 二 叉 树 dt 中 插入 数据 元 素 r, 使 仍 为 平衡 二 叉 树 
if(k) // 插入 数据 元 素 成 功 
{ printf(" 插 入 关键 字 为 %d 的 结 点 后 , 按 关键 字 顺 序 ( 中 序 ) 遍 历 平衡 二 叉 树 dt\n" ,r.key); 
TraverseDSTable(dt,Visit); // 按 关 键 字 顺序 (中 序 ) 遍 历 二 叉 树 此 ,确定 dt 是 否 排序 


printf("\n 先 序 遍 历 平 衡 二 叉 树 dt\n"); 
PreOrderTraverse(dt,Visit); // 先 序 遍 历 平衡 二 又 树 dt ,确定 dt 的 形态 
printf("\n"); 
} 
else // 插 人 数据 元 素 上 失败 
printf(" 平 衡 二 叉 树 dt 中 已 存在 关键 字 为 %d 的 数据 , 故 (%d,%d) 无 法 插入 到 dt 中 。\n"， 
r.key,r.key,r. others); 
} 
fclose(f); // 关闭 数据 文件 
printf(" 请 输入 待 查找 的 关键 字 的 值 : "); 
InputKey(j); // 由 键盘 输入 关键 字 j, 在 func8-5. cpp 中 
p= SearchBST(dt,j); // 在 平衡 二 又 树 dt 中 递归 地 查找 关键 字 等 于 j 的 结 点 
if(p) // 找到 ,p 指向 该 结 点 
printf("dt 中 存在 关键 字 为 %d 的 结 点 ,其 值 为 (%d, %d)。\n",j,p->data. key, 
p->data. others); 
else 
printf("dt 中 不 存在 关键 字 为 $d 的 结 点 。\n" ,j); 
DestroyDSTable(dt); // 销毁 平衡 二 又 树 此 
} 


程序 运行 结果 : 


插入 关键 字 为 37 的 结 点 后 , 按 关键 字 顺 序 ( 中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-27) 
C3 

先 序 遍 历 平衡 二 叉 树 dt 

(37,1) 

插入 关键 字 为 12 的 结 点 后 , 按 关键 字 顺 序 ( 中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-28) 
《到 六 3753》 

先 序 遍历 平衡 二 又 树 dt 

(37,1)(12,2) 

插入 关键 字 为 3 的 结 点 后 , 按 关 键 字 顺序 (中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-29) 


dt 


dt G7.D 
C22) 
图 8-27 插入 结 点 37 图 8-28 插入 结 点 12 图 8-29 插入 结 点 3,LL 型 不 平衡 


(3,3)(12,2)(37,1) 
先 序 遍 历 平衡 二 叉 树 dt 

(12,2)(3.3)(37.1) 

插入 关键 字 为 90 的 结 点 后 , 按 关键 字 顺 序 ( 中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-30) 
(3,3)(12,2)(37,1)(90,4) 

先 序 遍 历 平衡 二 又 树 dt 

(12,2)(3,3)(37,1)(90.4) 
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插入 关键 字 为 100 的 结 点 后 , 按 关键 字 顺 序 (中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-31) 
(3,3)(12,2)(37,1)(90,4)(100,5) 


dt 
C22) 
G3) G71D 
C60.4) 
图 8-30 插入 结 点 90 图 8-31 插入 结 点 100,RR 型 不 平衡 


先 序 遍历 平衡 二 又 树 dt 

(12,2)(3,3)(90,4)(37,1)(100,5) 

插入 关键 字 为 24 的 结 点 后 , 按 关 键 字 顺序 (中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-32) 
(3,3)(12,2)(24,6)(37,1)(90,4)(100,5) 


图 8-32 ”插入 结 点 24,RL 型 不 平衡 


先 序 遍 历 平衡 二 叉 树 dt 

(37,1)(12,2)(3,3)(24,6)(90,4)(100,5) 

插入 关键 字 为 53 的 结 点 后 , 按 关 键 字 顺序 (中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-33) 
(3,3)(12,2)(24,6)(37.1)(53.7)(90.4)(100.5) 

先 序 遍 历 平衡 二 又 树 dt 

(37,1)(12,2)(3,3)(24,6)(90.4)(53.7)(100.5) 

插入 关键 字 为 78 的 结 点 后 , 按 关键 字 顺 序 ( 中 序 ) 遍 历 平衡 二 又 树 此 
(3,3)(12,2)(24.6)(37,1)(53,7)(78.8)(90.4)(100,5) 

先 序 遍 历 平衡 二 又 树 dt( 见 图 8-34) 
(37,1)(12,2)(3.3)(24,6)(90.4)(53.7)(78.8)(100.5) 

插入 关键 字 为 61 的 结 点 后 , 按 关 键 字 顺 序 ( 中 序 ) 遍 历 平 衡 二 又 树 dt 
(3,3)(12,2)(24.6)(37,1)(53,7)(61.9)(78.8)(90,4)(100,5) 

先 序 遍 历 平衡 二 又 树 dt( 见 图 8-35) 
(37,1)(12,2)(3,3)(24,6)(90,4)(61,9)(53.7)(78,8)(100,5) 

插入 关键 字 为 70 的 结 点 后 , 按 关 键 字 顺序 (中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-36) 
(3,3)(12,2)(24,6)(37,1)(53.7)(61,9)(70.10)(78,8)(90.4)(100,5) 

先 序 遍 历 平衡 二 叉 树 dt 


dt 
a G7.D 
G7.D 22 G0.4) 
2.2) Go GD C49 GD C00 
GD C4) GD C00 CE 
图 8-33 插入 结 点 53 图 8-34 插入 结 点 78 


(37,1)(12,2)(3,3)(24,6)(78,8)(61,9)(53.7)(70,10)(90,4)(100,5) 
插入 关键 字 为 45 的 结 点 后 , 按 关 键 字 顺 序 ( 中 序 ) 遍 历 平衡 二 叉 树 dt( 见 图 8-37) 
(3,3)(12,2)(24,6)(37,1)(45,11)(53,7)(61,9)(70,10)(78,8)(90,4)(100,5) 
先 序 遍历 平衡 二 叉 树 dt 
(61,9)(37,1)(12,2)(3,3)(24,6)(53,7)(45.11)(78,8)(70.10)(90,4)(100,5) 
平衡 二 又 树 dt 中 已 存在 关键 字 为 53 的 数据 , 故 (53,12) 无 法 插入 到 dt 中 。 

请 输入 待 查找 的 关键 字 的 值 : 24xc 

dt 中 存在 关键 字 为 24 的 结 点 ,其 值 为 (24,6) 。 


图 8-36 插入 结 点 70,LR 型 不 平衡 
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dt 


2 78,8) 大 12,2 


12,2 
中 
GD CD (03 
1D 
图 8-37 插入 结 点 45,RL 型 不 平衡 


algo8-5. cpp 和 algo8-4. cpp 在 构造 二 又 树 时 用 的 是 同一 个 数据 文件 , 即 它 们 是 以 相同 
的 顺序 插入 相同 的 结 点 来 构造 二 又 树 的 。 但 比较 图 8-15 和 图 8-37 可 见 , 它 们 构造 的 二 叉 
树 的 形态 差别 很 大 ,平衡 二 又 树 的 深度 接近 最 低 , 受 结 点 输入 顺序 的 影响 不 大 ,而 二 又 排序 
树 的 形态 则 完全 受 结 点 输入 顺序 的 影响 。 

平衡 二 又 树 插 入 结 点 的 方法 和 二 又 排序 树 一 样 ,都 是 从 根 结 点 起 ,根据 待 插入 结 点 的 关 
刍 字 是 大 于 ,小 于 还 是 等 于 当前 结 点 的 关键 字 , 决 定 在 右 子 树 中 ,在 左 子 树 中 还 是 不 插入 结 
点 。 所 不 同 的 是 ,平衡 二 又 树 每 插入 一 个 结 点 就 从 插入 结 点 起 向 根 结 点 方向 通过 考察 祖先 
结 点 平衡 因子 的 变化 来 逐 层 检查 是 否 仍 为 平衡 二 又 树 。 如 果 由 于 插入 结 点 导致 该 结 点 的 某 
个 祖先 结 点 失衡 , 则 要 对 以 这 个 祖先 结 点 为 根 的 树 作 平 衡 旋转 处 理 。 方 法 是 通过 调换 根 结 
点 ,使 左右 子 树 的 深度 相等 。 在 调换 过 程 中 还 要 保证 二 又 树 的 有 序 性 。 

因为 新 插入 的 结 点 总 是 叶子 结 点 ,所 以 它 本 身 总 是 平衡 的 (bf 二 0)。 持 入 结 点 也 不 会 导 
致 它 的 双亲 结 点 不 平衡 (对 于 它 的 双亲 结 点 来 说 ,插入 结 点 的 这 棵 子 树 的 深度 由 0 变 为 1， 
另 一 棵 子 树 的 深度 只 能 是 0 或 1, 结 果 仍 是 平衡 的 )。 因 此 ,插入 结 点 如 果 导 致 平衡 二 又 树 
失衡 , 则 失衡 的 结 点 只 会 是 新 插入 结 点 的 祖先 结 点 (不 包括 双亲 结 点 )。 所 以 插入 结 点 导致 
平衡 二 又 树 失 衡 只 有 4 种 情况 : 

(1) 在 左 子 树 的 左 孩 子 分 支 上 插入 结 点 ,导致 失衡 , 称 LL(/) 型 (从 失衡 结 点 起 , 沿 着 插 
入 结 点 方向 的 连续 3 个 结 点 形 如 “/”) ,如 图 8-21 所 示 ; 

(2) 在 左 子 树 的 右 孩 子 分 支 上 插入 结 点 ,导致 失衡 , 称 LR( 所 ) 型 (从 失衡 结 点 起 , 沿 着 
插入 结 点 方向 的 连续 3 个 结 点 形 如 “二 ”) ,如 图 8-23 所 示 ; 

(3) 在 右 子 树 的 右 孩 子 分 支 上 插入 结 点 ,导致 失衡 , 称 RRO\) 型 (从 失衡 结 点 起 , 沿 着 插 
入 结 点 方向 的 连续 3 个 结 点 形 如 “\”) ,如 图 8-24 所 示 ; 

(4) 在 右 子 树 的 左 孩子 分 支 上 插入 结 点 ,导致 失衡 , 称 RL(>) 型 (从 失衡 结 点 起 , 沿 着 
插入 结 点 方向 的 连续 3 个 结 点 形 如 “二 ”) ,如 图 8-26 所 示 。 

注意 : 在 图 8-21、 图 8-23、 图 8-24 和 图 8-26 平衡 旋转 前 的 状态 中 ,只 有 工 所 指 结 点 的 
平衡 因子 是 插入 结 点 前 的 ,其 他 结 点 的 平衡 因子 都 是 插入 结 点 后 调整 过 的 。 因 为 插入 结 点 
后 总 是 由 新 插 结 点 逐 层 向 根 结 点 调整 。 上 述 4 幅 图 所 描述 的 正 是 对 树 工 进 行 的 平衡 调整 。 

读者 可 能 会 想 ,除了 在 图 8-21 .图 8-23、 图 8-24 和 图 8-26 所 示 的 8 种 需 进 行 平衡 调整 
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的 状态 外 ,是 否 还 有 其 他 的 状态 (如 各 子 树 的 深度 与 图 中 所 列 不 同 ) 也 需 进行 平衡 调整 ? 答 


案 是 否定 的 。 因 为 新 插 结 点 只 使 得 所 指 结 点 失衡 ,而 没有 使 其 子孙 结 点 失衡 。 
(1) (2) 两 种 情况 调用 LeftBalance() 函 数 ( 算 法 9. 12) 将 失衡 的 二 又 树 重新 调整 为 平衡 
二 又 树 。 


对 于 情况 (2) , 即 LR( 一 ) 型 失衡 ,如 图 8-22 所 示 , 在 LeftBalance() 函 数 中 先 对 左 子 树 
(小 值 结 点 ) 调 用 L_Rotate() 做 左旋 ,使 中 值 结 点 上 升 1 层 , 再 调用 R_Rotate() 做 右 旋 。 其 
新 插 结 点 的 具体 位 置 有 3 种 情况 ,如 图 8-23 所 示 ,分 别 是 : 插 在 中 值 结 点 的 左 ( 情 况 @). 右 
(情况 @) 子 树 中 ,或 者 新 插 结 点 就 是 中 值 结 点 本 身 ( 情 况 @)。 新 插 结 点 的 具体 位 置 虽 不 影 
响 旋转 操作 , 却 影响 大 .小 值 2 结 点 旋转 后 的 平衡 因子 , 故 要 区 分 这 3 种 情况 来 确定 它们 的 
平衡 因子 。 

对 于 情况 (1) , 即 LL(/) 型 失衡 ,在 LeftBalance() 函 数 中 只 调用 R_Rotate() 做 右 旋 。 如 
图 8-19 所 示 ,新 持 结 点 是 在 小 值 结 点 这 棵 子 树 中 。 由 于 在 右 旋 过 程 中 ,小 值 结 点 这 棵 子 树 
并 不 被 重 接 , 所 以 无 论 新 插 结 点 是 小 值 结 点 本 身 或 是 插 在 它 的 左右 子 树 中 都 不 影响 中 值 或 
大 值 结 点 的 平衡 因子 ,所 以 不 需要 分 情况 处 理 ,如 图 8-21 所 示 。 

(3)、(4) 两 种 情况 分 别 是 (1)、(2) 两 种 情况 的 镜像 ,对 应 地 调用 函数 RightBalance() ,不 
再 著述 。 

4 种 不 平衡 情况 经 调整 都 有 如 下 特性 : 

(1) 成 为 ACA) 型 ,调整 前 的 中 值 结 点 成 为 新 的 根 结 点 ,其 平衡 因子 为 0, 其 左 、 右 孩子 
分 别 是 小 值 .大 值 结 点 ， 

(2) 调整 后 树 的 深度 和 插入 结 点 前 一 样 。 

特性 (1) 解 释 了 对 于 LR 型 和 RL 型 要 作 两 次 单 旋 的 原因 。 以 图 8-37 为 例 , 第 1 次 以 结 
点 78 为 根 右 旋 ,虽然 未 改变 子 树 的 深度 ,但 中 值 结 点 (61) 也 就 是 新 根 结 点 由 第 3 层 调 到 了 
第 2 层 , 再 经 过 以 结 点 37 为 根 的 左旋 ,中 值 结 点 (61) 被 调 到 了 第 1 层 ,成 为 根 结 点 。 

根据 特性 (1) 和 平衡 二 又 树 的 有 序 性 ,很 容易 对 因 插 入 结 点 失衡 的 AVL 树 作 平衡 旋转 
处 理 。 以 图 8-37 为 例 : 插入 结 点 45 导致 结 点 37 失衡 。 由 结 点 37 沿 插入 结 点 方向 取 直 接 
下 两 层 的 结 点 78 和 61 ,构成 小 .大 .中 值 3 结 点 。 平衡 旋 转 后 的 树 应 以 中 值 结 点 61 为 根 ， 
结 点 37 和 78 分 别 为 61 的 左右 孩子 ,形成 “* 人 ”型 。 这 样 , 结 点 61 原先 的 左右 孩子 结 点 53 
和 70 失去 了 双亲 结 点 ,而 结 点 78 和 37 分 别 失去 了 左右 孩子 结 点 。 根 据 平衡 二 又 树 的 有 序 
性 ,显然 应 将 结 点 53 作为 37 的 右 孩 子 , 结 点 70 作为 78 的 左 孩 子 。 处 理 结 果 和 调用 函数 
RightBalance() 是 一 样 的 。 

bo8-3. cpp 中 的 函数 LR_Rotate() 和 RL_Rotate() 就 是 用 这 种 方法 直接 处 理 LR 和 RL 
失衡 的 。 启 用 algo8-5. cpp 的 第 9 行 , 在 函数 LeftBalance() 和 RightBalance() 中 就 分 别 调 
用 了 函数 LR_Rotate() 和 RL_Rotate() ,其 运行 结果 完全 一 样 。 

在 LeftBalance() 中 调用 L_Rotate(T 一 >lchild) 和 有 R_Rotate(T) 处 理 LR 型 不 平衡 的 好 
处 是 直接 使 用 已 有 函数 ,减少 了 函数 的 个 数 ;而 调用 LR_Rotate(T) 更 能 揭示 旋转 处 理 的 本 
质 ,二 者 各 有 千秋 。 

特性 (2) 说 明 如 果 插 入 一 个 结 点 导致 平衡 二 又 树 失衡 , 则 只 须 在 通 向 根 结 点 的 路 径 上 进 
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行 一 次 平衡 调整 。 以 图 8-36 为 例 ,插入 结 点 70 后 ,导致 结 点 90 和 结 点 37 失衡 。 调 整 了 距 
新 插 结 点 70 较 近 的 祖先 结 点 90 为 根 的 子 树 后 , 结 点 37 的 右 子 树 深度 和 插入 结 点 70 前 一 
样 ,也 就 不 用 再 调整 结 点 37 了 。 

平衡 二 又 树 在 插入 结 点 后 ,要 向 根 结 点 方向 逐 层 考察 是 否 导致 某 个 祖先 结 点 失衡 。 因 
为 InsertAVL() 是 递归 函数 ,在 插入 结 点 时 是 从 根 结 点 一 直 查 找到 子 树 为 空 才 插入 ,使 新 插 
结 点 为 叶子 结 点 。 递 归 函 数 返 回 时 恰 是 由 新 插 的 叶子 结 点 逐 层 退回 到 根 结 点 。 所 以 函数 
InsertAVL() 可 以 由 叶子 到 根 逐 层 通 过 返回 值 向 双亲 结 点 传递 是 否 插入 了 结 点 的 信息 。 

如 果 平 衡 二 又 树 中 已 存在 待 插入 结 点 , 则 InsertAVL() 不 再 插入 结 点 ,返回 值 为 
FALSE, 不 作 任 何 处 理 ; 如 果 平 衡 二 叉 树 中 不 存在 待 插 入 结 点 , 则 InsertAVL() 插 入 结 点 ， 
返回 值 为 TRUE。 同时 还 通过 引用 参数 taller, 向 双亲 结 点 传递 插入 结 点 是 否 导致 子 树 “ 长 
高 ”的 信息 。 

如 果 插 入 结 点 没有 导致 子 树 “ 长 高 ”, 则 不 会 失衡 。 如 图 8-33 所 示 ,插入 结 点 53 并 没有 
导致 其 双亲 结 点 90 "长 高 ”, 也 就 不 会 导致 其 祖先 结 点 37“ 长 高 ”, 故 不 作 任 何 处 理 。 

如 果 插 入 结 点 导致 子 树 * 长 高 ", 还 要 再 看 是 否 导 致 某 个 祖先 结 点 失衡 。 如 图 8-34 所 
示 ,插入 结 点 78 导致 其 双亲 结 点 53* 长 高 ”但 没有 失衡 , 则 不 作 调 整 ,把 “长 高 ”信息 继续 逐 
层 向 根 结 点 方向 传递 。 虽 然 结 点 90 和 结 点 37“ 长 高 "了 ,但 都 没有 失衡 。 如 图 8-32 所 示 , 插 
人 结 点 24 导致 其 双亲 结 点 37" 长 高 "但 没有 失衡 ,将 此 "长 高 "信息 向 上 传递 给 结 点 90 ,仍然 
“长 高 "但 没有 失衡 ,继续 将 “长 高 ”信息 向 上 传递 给 结 点 12, 结 点 24 的 插入 导致 结 点 12 失 
衡 , 需 对 结 点 12 作 调整 。 

有 些 教 材 定义 平衡 因子 为 右 子 树 的 深度 减 去 左 子 树 的 深度 , 仅 将 LH 定义 为 一 1, RH 
定义 为 十 1 即 可 。 


822 B 树 和 B: 树 


B_ 树 是 平衡 的 m 路 查找 树 ,“B” 表 示 平 衡 。 

平衡 二 又 树 的 查找 效率 很 高 ,但 在 数据 量 非 常 大 ,以 至 于 内 存 空间 不 够 容纳 平衡 二 又 树 
所 有 结 点 的 情况 下 ,就 得 另辟蹊径 。B_ 树 是 解决 这 个 问题 的 一 种 很 好 的 结构 。 

// c8-4.h 记录 类 型 的 结构 

struct Record // 记录 类 型 ( 见 图 8-38) Record 

{ KeyType key; // 关键 字 key | others 

| Others others; // 其 他 部 分 (由 主 程 定义 ) 图 8-38 ”记录 类 型 


// c8-5.h B_ 树 的 结 点 类 型 。 在 教科 书 第 239 页 

typedef struct BTNode 

{ int keynum; // 结 点 中 关键 字 个 数 , 即 结 点 的 大 小 
BTNode * parent; // 指向 双亲 结 点 
KeyType key[m+ 1]; // 关键 字 向 量 ,0 号 单元 未 用 
Record x recptr[m+ 1]; // 记录 指针 向 量 ,0 号 单元 未 用 


BTNode * ptr[m+ 1]; // 子 树 指针 向 量 
}BTNode, * BTree; // B_ 树 结 点 和 B_ 树 的 类 型 ( 见 图 8-39) 


// c8-6.h B 树 的 查找 结果 类 型 。 在 教科 书 第 240 页 
struct Result // B_ 树 的 查找 结果 类 型 ( 见 图 8-40) 
{ BTree pt; // 指向 关键 字 所 在 的 结 点 

int i; // 1..m, 在 结 点 中 的 关键 字 序号 

int tag; // 1: 查找 成 功 ,0: 查找 失败 


BTNode 


图 8-39 m 阶 B_ 树 结 点 及 指针 结构 


B_ 树 的 结 点 类 型 和 前 面 介绍 过 的 所 有 静态 ,动态 查找 表 的 结 点 类 型 有 一 个 重要 区 别 ，: 
它 不 是 把 整个 记录 (或 数据 ) 都 存放 在 结 点 中 ,而 是 仅 在 结 点 中 存放 记录 的 关键 字 和 记录 的 
地 址 两 项 。 在 结 点 中 查找 到 关键 字 后 ,再 根据 其 地 址 找到 记录 。 当 记录 所 占 的 存储 空间 非 
常 大 (如 和 人口 普 查 资料 ,除了 身份 证 号 码 作为 关键 字 外 ,还 有 姓名 民族、 籍贯 .文化 程度 . 婚 
姻 状 况 、 职 业 、 户 口 所 在 地 ,住址 等 一 系列 信息 ) 时 ,这 样 做 的 好 处 是 减 小 了 结 点 占用 的 存储 


空间 ,也 就 减 小 了 整个 B_ 树 占用 的 存储 空间 。 


B_ 树 是 m 路 查找 树 , 它 的 每 个 结 点 最 多 可 以 有 m 一 1 个 关键 字 ,m 棵 子 树 (m 二 2 时 即 
为 二 叉 树 ,有 1 个 关键 字 ,2 棵 子 树 ) 。 子 树 总 比 关键 字 的 数量 多 1, 故 key[0] 和 recptr[0] 单 
元 不 用 ,而 ptrL0] 单 元 要 用 。[mj 单 元 在 正常 情况 下 是 不 用 的 ,只 是 在 结 点 的 keynum 一 m 一 1， 
又 向 该 结 点 插入 关键 字 时 ,临时 占用 [mj] 单 元 。 然 后 就 要 把 该 结 点 尽量 平均 地 分 裂 成 2 个 


和 


// bo8-4.cpp B 树 的 基本 操作 .包括 算法 9. 13 和 算法 9.14 
void InitDSTable(BTree &DT) 
{ // 操作 结果 : 构造 一 个 空 的 B 树 DT( 见 图 8-41) 
DT = NULL; 
} 
void DestroyDSTable(BTree &DT) 
{ // 初始 条 件 : B 树 DT 存在 。 操 作 结 果 : 销毁 DT 


图 8-40 B 树 的 查找 结果 类 型 


DT 


NULL 


查找 


图 8-41 空 的 B 树 DT 


267 


数据 结构 算法 解析 


int i; 
i£(DT) // 非 空 树 
{ for(i=0;i 二 =DT -keynum;i++ ) // 由 第 0 棵 到 第 keynunm 棵 
DestroyDSTable(DT - 盖 ptr[i); // 依次 递归 销毁 第 i 棵 子 树 
free(DT) ; // 释放 根 结 点 
DT= NULL; // 空 指针 赋 0 


} 
void TraverseDSTable(BTree DT,void(# Visit)(BTNode, int)) 
{ // 初始 条 件 : B_ 树 DT 存在 .Visit 是 对 结 点 操作 的 应 用 函数 
// 操作 结果 : 按 关键 字 的 顺序 对 DT 的 每 个 结 点 调用 函数 Visit() 一 次 且 至 多 一 次 
int i; 
if(DT) // 非 空 树 
for(i=0;i 一 = DT- 二 keynum;i++ ) // 对 于 DT 的 所 有 关键 字 和 子 树 
{ if(i>0) // 有 关键 字 
Visit( * DT,i); // 访问 DT 的 第 i 个 关键 字 及 记录 指针 
if(DT -二 ptr[i]) // DT 有 第 i 棵 子 树 
TraverseDSTable(DT ->ptr[i],Visit); 
// 对 DT 的 第 守 棵 子 树 ,递归 调 用 TraverseDSTable() 


} 
int Search(BTNode# p,KeyType K) 
{ // 采用 折 半 查找 法 在 p -二 key[1. .keynum] 中 查找 i, 使 得 pkey[i]<<Kk<p->key[i+1] 
int mid,low = 1,high = p- 二 keynum; // 置 区 间 初 值 
if LT(K,p- 二 key[low]) // 关键 字 太 小 ,p -二 key[1. .keynum] 中 不 存在 K 
return 0; // 返回 0 
while(low 二 high) // 当 查找 范围 大 于 1 
{ mid= (low+ high+1)/2; // 中 值 ( 取 偏 大 ) 
if EQ(K,p -二 key[mid]) // 中 值 是 K 
return mid; // 返回 其 序号 
if LT(GK,p -二 key[mid]j) // K 小 于 中 值 
high=mid- 1; // 继续 在 前 半 区 间 进 行 查找 
else // K 大 于 中 值 
low = mid; // 继续 在 包括 [Lmidj] 的 后 半 区 间 进 行 查找 
} 
return low; // low = high, 查 找 范围 等 于 1 且 bp- 二 key[1. .keynum] 中 不 存在 KK 

} 

Result SearchBTree(BTree T,KeyType K) 

{ // 在 m 阶 B_ 树 T 上 查找 关键 字 K, 返 回 结 果 (pt,i,tag)。 若 查找 成 功 , 则 特征 值 
// tag=1, 指 针 pt 所 指 结 点 中 第 i 个 关键 字 等 于 K; 否则 特征 值 tag= 0, 等 于 kK 的 
// 关键 字 应 插入 在 指针 Pt 所 指 结 点 中 第 i 和 第 i+1 个 关键 字 之 间 。 算 法 9.13 
BTree p=T 了 ,q= NULL; // 初始 化 ,p 指向 待 查 结 点 :q 指 向 p 的 双亲 
Status found = FALSE; // 查找 成 功 标志 , 初 值 为 未 成 功 
int i=0; 


Result r; // 查找 结果 存 于 此 变量 ,以 便 返 回 


while(p&&1found) // 待 查 结 点 *p 不 为 空 且 未 找到 
{ 羡 = Search(p,K); // 在 结 点 *p 中 查找 关键 字 
if(i>0g&gp -key[i]==K) // 找到 
found = TRUE; // 置 查找 成 功 标志 为 真 
else // 未 找到 
{ q=p; // 继续 向 下 找 , 当 前 结 点 成 为 新 的 双亲 结 点 
p=p->ptr[i 订 ; // p 指 向 继续 查找 的 结 点 


} 
证 (found) // 查找 成 功 
{ r.pt=p; //r.pt 指向 关键 字 K 所 处 的 结 点 
r.tag=1; // 查找 成 功 标志 
} 
else // 查找 不 成 功 ,返回 K 的 插入 位 置信 息 
{ r.pt=q; // .pt 指向 关键 字 kK 应 插入 的 结 点 
r.tag= 0; // 查找 不 成 功 标志 
} 
r.i=i; // r.i 指 示 工 .pt 所 指 结 点 中 关键 字 X 所 在 (找到 ) 或 应 在 其 后 插入 (未 找到 ) 的 序号 
return r; // 返回 结果 (pt,i,tag) 
} 
void split(BTree q,BTree &ap) 
{ // 将 结 点 * q 分 裂 成 两 个 结 点 ,前 一 半 保 留 在 *q, 后 一 半 移 入 新 生 结 点 * ap( 见 图 8-42) 
ap q ap 


| | 


三 团 回 田 同 | rl 加 :3 
B 天 ke 图 网 | 峡 [出 ks 国 
ou 图 [LT]| 国 | [ou [zfsl 国 | 


(a) 分 裂 前 (b) 分 裂 后 
图 8-42 调用 split 〇 示例 (m 二 3, 分 裂 后 ,(r2,k2) 持 到 x q 的 双亲 结 点 中 ,q 和 ap 作为 它 的 左右 子 树 ) 


int i; 
ap = (BTree)malloc( sizeof(BTNode)); // 生成 新 结 点 * ap 
ap -ptr[0] = q- 之 ptr[sj]; // 结 点 * 9q 的 后 一 半 移 入 结 点 * ap 
if(ap -ptr[0]) // ap -ptr[0] 不 为 空 
ap -二 ptr[0] -二 parent = ap; // 给 ap -ptr[0] 的 双亲 域 赋值 ap 
for(i=s+1;i<=m;i++) // 对 于 *q 中 后 一 半数 据 
{ ap -key[i-s]=q-key[i]; // 3 个 成 员 均 移 结 点 * ap 
ap -二 recptr[i- s] = q->recptr[i]; 
ap -二 ptr[i- s]=q->ptr[i]; 
证 (ap -ptr[i- s]) // ap -之 ptr[i- sj 不 为 空 
ap -二 ptr[i- s] -二 parent = ap; // 给 ap- 二 ptr[i- sj 的 双亲 域 赋 值 ap 
} 
ap -二 keynum=m- si // 新 结 点 * ap 的 关键 字 个 数 
q->keynum=s-1; // *q 的 前 一 半 保 留 ,修改 * q 的 关键 字 个 数 
} 
void Insert(BTree q.int i.Record¥ r.,BTree ap) // ( 见 图 8-43) 
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{ // 将 记录 地 址 = 和 上 -key 分 别 赋 给 q->recptr[i+1] 和 q->keyLi+1].q->ptr[Li+1l] 指 向 结 点 * ap 


int j; 

for(j = qd- 一 keynum;j>i;j 一 ) // 由 后 到 前 , 空 出 (x q)[i+1] 

{ qd->keyLj+1]=q->key[j]; // 3 个 成 员 均 向 后 移 q q k 
q->recptr[j +1]=q->recptr[j]; | 下 
q->ptrUj+IJ=q- 之 ptr[j]; 国 回 加 fre. 

) 2 出 al 3 k 

'. t0| tl tlt lap|@ 
q->key[i+1] =r->key; // 将 r->key 赋 给 q 一 key[i+1] 

q ->recptr[i+ 了 =r; // 将 记录 地 址 r 赋 给 9->recpt[i+ 匡 多 插入 前 外 揪 入 后 


q- 二 ptr[i+1] = ap; // q- 二 ptr[i+1] 指 向 结 点 * ap(ap 是 图 8-43 调用 Insert() 示 例 (i 一 1) 
r 的 右 孩 子 ) 

if(ap) // ap 不 空 

ap -二 parent = q; // q 是 ap 的 双亲 所 在 的 结 点 

qkeynum++; // 结 点 * q 的 关键 字数 量 加 1 
} 
void NewRoot(BTree &T,.Record# r .BTree ap) 
{ // 生成 含 信息 (T,r,ap) 的 新 的 根 结 点 *T, 原 根 结 点 了 和 ap 为 其 子 树 指针 ( 见 图 8-44) 

Ly 


用 人 表示 NULL i 


(a) 空 树 生成 第 1 个 结 点 ( 根 结 点 ) (b) 非 空 树 生成 新 根 结 点 
图 8-44 ”调用 NewRoot() 示 例 


BTree p = (BTree)malloc(sizeof(BTNode)); // 动态 生成 新 根 结 点 
p -parent = NULL; // 新 根 结 点 的 双亲 为 空 
p -keynum = 1; // 新 根 结 点 有 1 个 关键 字 
p -key[1] =r- 记 key; // 这 个 关键 字 是 记录 的 关键 字 
Pp- 二 recptr[1] =r; // 指向 记录 
p->ptr[0] =T; // 原 根 结 点 了 为 新 根 结 点 的 第 1 棵 子 树 
if(T) // 原 根 结 点 了 不 空 
T- 二 parent = p; // 新 根 结 点 是 原 根 结 点 了 的 双亲 
pP->ptr[1] = ap; // 结 点 * ap 为 新 根 结 点 的 第 2 棵 子 树 
证 (ap) // ap 不 空 
ap -请 parent = p; // 新 根 结 点 是 ap 的 双亲 
T=p; //T 指 向 新 根 结 点 
} 
void InsertBTree(BTree &T.Record#* r.BTree q.int i) 
{ // 在 m 阶 B 树 T 上 结 点 *q 的 key[i 与 key[i+1] 之 间 插 入 关键 字 上 ->k 和 地 址 r。 若 引起 
// 结 点 过 大 , 则 沿 双亲 链 进行 必要 的 结 点 分 裂 调整 ,使 了 仍 是 m 阶 B 树 。 修 改 算法 9. 14 
BTree ap= NULL; // 空 结 点 


Status finished = FALSE; // 插入 完成 标志 ,初始 为 未 完成 
while(q&&1finished) // q 不 空 且 未 完成 插入 
{ Insert(q,i,r,ap); // 将 <- 二 key 和 记录 地 址 r 分别 赋 给 q- 二 key[Li+1] 和 q- 二 recptr[i+1]， 
// q->ptr[i+1] 指 向 结 点 * ap 
if(q -keynum<m) // 关键 字 未 超出 结 点 的 容量 
finished = TRUE; // 插入 完成 
else // 关键 字 超 出 了 结 点 的 容量 ,分裂 结 点 * q 
{ r=q->recptr[s]; // 分 裂 点 的 记录 地 址 赋 给 
split(q'ap); // 将 q->key[Ls+1.. 串 ,q- 盖 recptr[s+1.. 四 和 qq- 二 ptrLs. .四 移入 结 点 * ap 
// 结 点 * q 中 仅 保留 g->key[1..s-1],q->recptr[1..s-1] 和 q->ptr[0..s-1] 
q= q->parent; // 当前 结 点 为 被 分 裂 结 点 的 双亲 结 点 
if(q) // 被 分 裂 结 点 的 双亲 结 点 存在 
i= Search(q,r -key); // 在 被 分 裂 结 点 的 双亲 结 点 * q 中 查找 工 -二 key 的 插入 位 置 


} 
if(1finished) // 了 是 空 树 (参数 q 初 值 为 NOLL) 或 根 结 点 已 分 裂 为 结 点 x*q 和 *ap 
NewRoot(T,r,ap); // 生成 含 信息 (T,r'ap) 的 新 的 根 结 点 * T, 原 了 和 ap 为 子 树 指针 


// func8-6. cpp 包括 对 B_ 树 的 输入 输出 操作 

void Visit(BTNode c,int i) // TraverseDSTable() 调 用 的 与 之 配套 的 访问 记录 的 函数 
{ printf("(%d, %d)",c. recptr[i|] ->key,c. recptr[i| ->others. order); 

} 

void InputKey(KeyType &k) // 与 之 配套 的 由 键盘 输入 关键 字 的 函数 

{ scanf("%d",&k); 

} 


// algo8-6. cpp 检验 bo8-4.cpp 的 程序 

间 include"cil.h" 

间 define m 3 // B_ 树 的 阶 , 现 设 为 3 

int s= (m+1)/2; // s 为 分 裂 结 点 的 中 值 

typedef int KeyType; // 设 关键 字 域 为 整 型 

struct Others // 记录 的 其 他 部 分 

{ int order; // 整 型 变量 ,顺序 

}s 

间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 

并 define N 12 // 记录 数组 的 数据 元 素 个 数 

间 include"c8-4.h" // 记录 类 型 

间 include"c8-5.h" // B_ 树 的 结 点 类 型 

间 include"c8-6.h" // B 树 的 查找 结果 类 型 

间 include"bo8-4.cpp" // B_ 树 的 基本 操作 ,包括 算法 9.13 和 算法 9.14 

间 include"func8-6.cpp" // 包括 对 B 树 的 输入 输出 操作 

void main() 

{ 
Record r[N] = {{24,1),{45,2)},{53,3},{12,4},{37,5}, {50,6},{61,7},{90,8}, 
{100,9},{70,10),{3,11},{37,12)); //( 记 录 元 素 存 于 数组 中 ,以 教科 书 中 图 9.16(a) 为 例 ) 
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BTree t; 
Result ui; 
KeyType j; 
int i; 
InitDSTable(t); // 构造 空 的 B_ 树 七 
for(i=0;i<Nii++ ) // 将 记录 数组 r[N] 的 数据 依次 插入 树 t 中 
{ u= SearchBTree(t,r[i].key); // 在 树 t 中 查找 是 否 已 存在 关键 字 为 r[i].key 的 记录 
if(u. tag) // 在 树 t 中 已 存在 关键 字 为 r[ 订 .key 的 记录 
Printf(" 树 上 中 已 存在 关键 字 为 sd 的 记录 , 故 (%d, %d) 无 法 插入 。\n",r[il].key， 
r[i].key,r[i].others. order); 
else // 在 树 t 中 不 存在 关键 字 为 r[i]. key 的 记录 
InsertBTree(t,&r[i]l,u.pt,u.i); 
// 将 区 菇 的 关键 字 和 地 址 插入 到 上 中 结 点 u.pt 的 [u. 订 和 [u.i+1]j 之 间 
} 
printf(" 按 关键 字 的 顺序 遍历 B_ 树 t: \n"); 
TraverseDSTable(t,Visit); // 按 关 键 字 的 顺序 遍历 B_ 树 t 
for(i=1;i<=4;i++ ) // 4 次 在 树 t 中 查找 给 定 关 键 字 的 数据 
printf("\n 请 输入 待 查找 记录 的 关键 字 :"); 
InputKey(j); // 输入 关键 字 j 
u= SearchBTree(t,j); // 在 树 t 中 查找 关键 字 为 j 的 数据 
if(u.tag) // 找到 
Visit( x* (u.pt),u.i); // 输出 查找 到 的 记录 
else // 未 找到 
printf(" 未 找到 "); 


} 

printf("\n"); 

DestroyDSTable(t); // 销毁 树 t 
} 


程序 运行 结果 ( 见 图 8-45) : 


树 t 上 中 已 存在 关键 字 为 37 的 记录 , 故 (37,12) 无 法 插入 。 
按 关键 字 的 顺序 遍历 B_ 树 t: 
(3,11)(12,4)(24,1)(37.5)(45,2)(50,6)(53,3)(61,7)(70,10)(90,8)(100,9) 
请 输入 待 查找 记录 的 关键 字 : 90x 

(90,8) 

请 输入 待 查找 记录 的 关键 字 : 37& 

(37,5) 

请 输入 待 查找 记录 的 关键 字 : 40 

未 找到 

请 输入 待 查找 记录 的 关键 字 : 55xc 

未 找到 


函数 SearchBTree() 返 回 在 B_ 树 中 查找 关键 字 的 结果 。 如 找到 ,结果 指示 关键 字 所 在 
的 结 点 及 在 该 结 点 中 的 序号 ,如 图 8-45 中 的 u(1) 和 u(2); 如 未 找到 ,结果 指示 关键 字 应 插 
入 的 结 点 及 其 前 驱 关 键 字 在 结 点 中 的 序号 ,如 图 8-45 中 的 u(3) 和 u(4)。 注 意 : 其 前 驱 关 
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图 8-45 algo8-6. cpp 程序 运行 结果 


键 字 的 右 孩 子 (或 其 后 继 关 键 字 的 左 孩子 ) 一 定 是 空 。 

algo8-6. cpp 调用 bo8-4. cpp 中 的 算法 9. 13 仅 对 B_ 树 作 了 示意 性 的 描述 。B_ 树 是 用 
于 处 理 大 数据 量 的 查找 操作 的 。 其 中 的 记录 量 大 到 不 能 够 存放 在 内 存 数组 r 中 ,要 将 记 
录 存 放 在 外 存 的 多 个 文件 中 。 甚 至 内 存 中 也 放 不 下 整个 B_ 树 ,内 存 中 只 能 存放 B_ 树 的 1 
个 结 点 。 所 以 ,B_ 树 的 每 个 结 点 都 存 于 外 存 的 文件 中 。 查 找 过 程 是 首先 将 B_ 树 的 根 结 点 
文件 放 入 内 存 中 ,依据 关键 字 进 行 查找 。 随 时 关闭 查找 过 的 B_ 树 结 点 ,再 在 内 存 中 随时 
打开 新 的 B_ 树 结 点 ,直至 查找 结束 。 为 了 提高 查找 速度 ,就 要 尽量 减少 打开 、 关 闭 文 件 的 
次 数 。 则 要 尽量 增 大 B_ 树 每 个 结 点 可 容纳 的 关键 字数 。 


823 键 树 


键 树 用 于 关键 字 为 字符 串 的 情况 , 故 键 树 也 称 为 “词典 查找 树 ”。 


// c8-7.h 键 树 记录 的 存储 结构 。 在 教科 书 第 248 页 

并 define MAX_KEY LEN 16 // 关键 字 串 的 最 大 长 度 

struct KeyType // 关键 字 串 类 型 ,类 似 串 的 定 长 顺序 存储 结构 ( 见 图 8-46) 
{ char ch[MAX_KEY_ LEN];，// 关键 字 串 


KeyType 
int num; // 关键 字 串 长 度 由 
}s | | “a num 
enum NodeKind{LEAF ,BRANCH) ; // 结 点 种 类 : {叶子 .分支 } [0] 
// c8-8.h 双 链 键 树 的 存储 结构 。 在 教科 书 第 248 页 MREY DEN 
typedef struct DLTNode // 双 链 树 类 型 ( 见 图 8-47) 图 8-46 ”KeyType 关键 字 串 类 型 


{ char symbol; // 关键 字符 
DLTNode x next; // 指向 右 兄弟 结 点 的 指针 
NodeKind kind; // 结 点 种 类 
union // 共用 体 
{ Record x infoptr; // 叶子 结 点 的 记录 指针 
DLTNode * first; // 分 支 结 点 的 孩子 链 指针 
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DLTree DLTNode( 分 支 结 点 ) 
] ~[ymbol next|BRANCH| first 


人 
DLTNode DLTNode 
DLTree DLTNode( 叶 子 结 点 ) 


}-= [symbol| next [LEAF| infoptr 


1 1 1 
JJ-L__ 4 IkeyLothers 1 
DLTNode Record 


图 8-47 ” 双 链 树 存储 结构 


}s 
}DLTNode, * DLTree; 


// bo8-5.cpp 双 链 键 树 的 基本 操作 ,包括 算法 9.15 
void InitDSTable(DLTree &DT) 


{ // 操作 结果 : 构造 一 个 空 的 双 链 键 树 DT( 见 图 8-48) DT 
DT = NULL; NULL 


图 8-48 空 的 双 链 键 树 DT 


} 
void DestroyDSTable(DLTree &DT) 
{ // 初始 条 件 : 双 链 键 树 DT 存在 。 操 作 结 果 : 销毁 DT 
if(DT) // 非 空 树 
{ 证 (DT -二 kind == BRANCH) // * DT 是 分 支 结 点 
DestroyDSTable(DT -二 first); // 递归 销毁 孩子 子 树 
DestroyDSTable(DT -二 next); // 递归 销毁 兄弟 子 树 
free(DT); // 释放 根 结 点 
DT = NULL; // 空 指针 赋 0 


} 
Record# SearchDLTree(DLTree T,KeyType K) 
{ // 在 双 链 键 树 了 中 查找 关键 字 串 等 于 XK 的 记录 ,车 存在 ， 
// 则 返回 指向 该 记录 的 指针 ; 否则 返回 空 指针 。 修 改 算法 9.15 
DLTree p=T; // 初始 化 
int i=0; 
if£(T) // 树 不 空 
{ while(p&&i<K.num) // *p 不 空 且 未 到 最 后 一 个 字符 
{ while(p&&p 一 symbol!l=K.ch[i]) // 查找 关键 字 的 第 位 
p=p -next; // 顺序 在 右 兄弟 结 点 中 查找 
if(p&&i<K. num) // 准备 查找 下 一 位 
p=Pp->first; // p 指 向 孩子 结 点 
++i; // 关键 字 向 后 移 一 位 
} // 查找 结束 
if(1p) // 查找 不 成 功 
return NULL; 
else // 查找 成 功 


return p -infoptr; // 返回 指向 该 记录 的 指针 
} 
else // 树 空 
return NULL; 
} 
void InsertDSTable(DLTree &DT,Record#* r) 
{ // 初始 条 件 : 双 链 键 树 DT 存在 ,r 为 待 插入 的 数据 元 素 的 指针 
// 操作 结果 : 若 咪 中 不 存在 其 关键 字 串 等 于 ( * r).key. ch 的 数据 元 素 , 则 按 关 键 字 顺序 插 工 到 DT 中 
DLTree p= NULL,q,ap; 
int i=0; 
KeyType K=r->key; 
if(1DT&&K. num) // 空 树 且 关键 字符 串 非 空 
{ DT = ap = (DLTree)malloc(sizeof(DLTNode)); // 动态 生成 根 结 点 
for(;i<K.num;i++ ) // 插入 分 支 结 点 
{ 证 (p) // p 不 空 (不 是 第 一 次 生成 结 点 ) 
p -first = ap; // p 的 孩子 指针 指向 新 生成 的 结 点 
ap -二 next = NULL; // 右 兄 弟 为 空 
ap -symbol = K.ch[i]; // 关键 字符 为 当前 位 关键 字 
ap -二 kind = BRANCH; // 结 点 种 类 为 分 支 
p=ap; // p 指 向 ap 
ap = (DLTree)malloc(sizeof(DLTNode)); // 动态 生成 孩子 结 点 
} 


p -first =ap; // 插入 叶子 结 点 ( 见 图 8-49) ap 

ap -之 next = NULL; // 叶 于 结 点 的 右 见 弟 为 空 (NurdLear| | 
ap -symbol = Nil; // 叶子 结 点 的 关键 字符 为 空 

ap ->kind= LEAF; // 结 点 种 类 为 叶子 "— [key | oess | 
ap -二 infoptr =r; // 记录 指针 指向 关键 字 串 所 在 记录 图 8-49 叶子 结 点 


} 
else // 非 空 树 
{ p=DT; // 指向 根 结 点 
while(p&&i<K.num) // x*Pp 不 空 且 i 小 于 关键 字 串 的 长 度 
{ while(p&g&p 一 symbol<K.ch[i]) // 沿 右 兄弟 结 点 查找 当前 关键 字符 
{ q=p; // q 指 向 当前 结 点 
p=p->next; // p 指 向 当前 结 点 的 右 见 弟 结 点 
} 
if(p&&p 玉 symbol == K.ch[i]) // 找到 与 KX.ch[ 订 相符 的 结 点 
{ q=p; // q 指 向 当前 结 点 
p=p-first; // p 指 向 将 与 XK.ch[i+1] 比 较 的 结 点 (孩子 结 点 ) 
++i; // 关键 字 向 后 移 一 位 
} 
else // 未 找到 与 KX.ch[i] 相 符 的 结 点 ,插入 关键 字 
{ ap = (DLTree)malloc(sizeof(DLTNode)); // 动态 生成 结 点 
if(q->first == p) 
q->first= ap; // 在 长 子 的 位 置 插入 
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else // qd- 二 next ==p 
q- 二 next = ap; // 在 右 兄 弟 的 位 置 插 入 
ap -二 next = p; // 右 兄 弟 为 p 
ap -symbol = K.ch[i]; // 关键 字符 为 当前 位 关键 字 
ap -二 kind = BRANCH; // 结 点 种 类 为 分 支 
p=ap; // p 指 向 ap 
ap = (DLTree)malloc( sizeof(DLTNode)); // 动态 生成 结 点 
i++; // 关键 字 向 后 移 一 位 
for(;i<K.num;i++ ) // 插入 分 支 结 点 
p- 二 first = ap; // 在 长 子 的 位 置 插入 
ap -二 next = NULL; // 右 兄 弟 为 空 
ap -symbol = K.ch[i]; // 关键 字符 为 当前 位 关键 字 
ap -二 kind = BRANCH; // 结 点 种 类 为 分 支 
p=ap; // p 指 向 ap 
ap = (DLTree)malloc(sizeof(DLTNode)); // 动态 生成 孩子 结 点 
} 
pfirst = ap; // 插入 叶子 结 点 ( 见 图 8-49) 
ap -next = NULL; // 叶子 结 点 的 右 见 弟 为 空 
ap -二 symbol = Nil; // 叶子 结 点 的 关键 字符 为 空 
ap -二 kind = LEAF; // 结 点 种 类 为 叶子 
ap -之 infoptr=r; // 记录 指针 指向 关键 字 串 所 在 记录 


} 
struct SElemType // 定义 栈 元 素 类 型 
{ char ch; 
DLTree p; 
上 
间 include"c3-1.h" // 顺序 栈 
间 include"bo3-1.cpp" // 顺序 栈 的 基本 操作 
void TraverseDSTable(DLTree DT.void( # Visit)(Record ¥ )) 
{ // 初始 条 件 : 双 链 键 树 DT 存在 ,Visit 是 对 记录 操作 的 应 用 函数 
// 操作 结果 : 按 关 键 字 的 顺序 输出 关键 字 及 其 对 应 的 记录 
SqStack s; 
SElemType e; 
DLTree p; 
int i=0,n=9; // 输出 nn 个 元 素 后 换行 
证 (DT) // 树 非 空 
{ InitStack(s); // 初始 化 栈 
e.p= DT; // 将 根 结 点 的 信息 赋 给 e 
e.ch=DT->>symbol; 
Push(s,e); // 将 e 入 栈 
p=DT->first; // p 指 向 根 结 点 的 长 子 


while(p -二 kind == BRANCH) // p 是 分 支 结 点 
{ e.p=p; // 将 结 点 Pp 的 信息 赋 给 e 
e.ch=p->symbol; 
Push(s,e); // 将 e 人 栈 
p=p->first; // p 指 向 p 的 长 子 
} 
e.p=p; // 将 结 点 p 的 信息 赋 给 e 
e.ch=p-> synmbol; 
Push(s,e); // 将 e 人 栈 
Visit(p -二 infoptr); // 访问 叶子 结 点 的 记录 
i++; // 访问 数 +1 
while( 1StackEmpty(s)) // 栈 不 空 
{ Pop(s,e); // 弹出 栈 顶 元 素 
p= e.p; // 栈 元 素 指 针 赋 p 
让 (p- 二 next) // p 有 右 兄 弟 结 点 
{ p=p->next; // p 指 向 p 的 右 兄弟 
while(p -二 kind == BRANCH) // p 是 分 支 结 点 
{ e.p=p; // 将 结 点 p 的 信息 赋 给 e 
e.ch=p->symbol; 
Push(s,e); // 将 e 人 栈 
p=p->first; // p 指 向 p 的 长 子 
} 
e.p=p; // 将 结 点 p 的 信息 赋 给 e 
e.ch= p->symbol; 
Push(s,e); // 将 e 入 栈 
Visit(p -二 infoptr); // 访问 叶子 结 点 的 记录 
i++; // 访问 数 +1 
if(i%n==0) 
printf("\n"); // 输出 n 个 元 素 后 换行 


// func8-7.cpp 包括 对 键 树 的 输入 输出 操作 

void Visit(Record#r) // TraverseDSTable() 调 用 的 与 之 配套 的 访问 记录 的 函数 
{ printf("(%s, %d)",r—>key.ch,r—>others. order); 

} 

void InputKey(char# k) // 与 之 配套 的 由 键盘 输入 关键 字符 串 的 函数 

{ scanf("%s",k); // 输入 待 查找 记录 的 关键 字符 串 给 

} 


f8-5. txt 内 容 如 下 : 
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CRI 1 
CRO 2 
ETI3 
LAN4 
CHR 5 
CHANG 6 
WEN 7 
CHAO 8 
YUN 9 
YRNG 10 
LONG 11 
WANG 12 
ZHAO 13 
LIU 14 
WU 15 
CHEN 16 
LI 17 


// algo8-7. cpp 检验 bo8-5.cpp 的 程序 
间 include"cl.h" 
间 define N 20 // 数组 可 容纳 的 数据 元 素 个 数 
struct Others // 记录 的 其 他 部 分 
{ int order; // 整 型 变量 ,顺序 
和 
提 define Nil '$'// 定义 结束 符 为 $ 
间 include"c8-7.h"” // 键 树 记 录 的 存储 结构 
间 include"c8-4.h"” // 记录 类 型 
间 include"c8-8.h" // 双 链 键 树 的 存储 结构 
间 include"bo8-5.cpp" // 双 链 键 树 的 基本 操作 
间 include"func8-7.cpp" // 包括 对 键 树 的 输入 输出 操作 
void main() 
{ 
DLTree t; 
int i,j= 0; // 数据 个 数 ,初始 为 0 
KeyType k; 
Record * p,r[N]; // 记录 数组 
FILE x*f; // 文件 指针 类 型 
InitDSTable(t); // 构造 空 的 双 链 键 树 t 
f= fopen("f8-5.txt","r"); // 打开 数据 文件 f8-5. txt 
do // 将 数据 文件 中 的 记录 依次 读 入 工 并 插入 树 t 
{ i=fscanf(f,"%s%d",.&r[j].key.ch.&r[j].others. order); // 由 文件 输入 数据 给 r[j] 
(i1=-1) // 输入 数据 成 功 
{ [站 .key. num = strlen(r[j].key. ch); // 给 [jj.key. nun 域 赋值 
p= SearchDLTree(t,r[j].key); // 在 双 链 键 树 t 中 查找 关键 字 串 等 于 r[j].key 的 记录 
if(1p) //t 中 不 存在 关键 字 为 r[j]. key 的 项 
{ InsertDSTable(t,&r[j]); // 将 r[j] 的 地 址 及 关键 字 串 插入 t 中 


j++; // 记录 数组 的 数据 个 数 + 1 
} 
else // 在 树 t 中 已 存在 关键 字 为 r[j].key 的 项 
printf(" 树 上 中 已 存在 关键 字 为 %s 的 记录 , 故 (%s,%d) 无 法 插入 。\n"， 
r[j]. key. ch,r[j].key. ch,r[j].others. order); 
} 
}while( 1feof(f) &&j<N); // 未 到 数据 文件 的 结尾 且 记 录 数 组 未 满 
fclose(f); // 关闭 数据 文件 
printf(" 按 关键 字符 串 的 顺序 遍历 树 t: \n"); 
TraverseDSTable(t,Visit); // 遍历 双 链 键 树 t 
printf("\n 请 输入 待 查找 记录 的 关键 字符 串 :"); 
InputKey(k. ch); // 输入 待 查找 记录 的 关键 字符 串 给 k. ch 
k. num = strlen(k.ch); // 求 得 关键 字符 串 的 长 度 赋 给 k. num 
p= SearchDLTree(t,k); // 在 双 链 键 树 t+ 中 查找 关键 字 串 等 于 k 的 记录 
if(p) // 存在 该 记录 
Visit(p); // 输出 该 记录 
else // 不 存在 该 记录 
printf(" 未 找到 "); // 输出 未 找到 信息 
printf("\n"); 
DestroyDSTable(t); // 销毁 双 链 键 树 t 
} 


程序 运行 结果 ( 见 图 8-50): 


树 t 中 已 存在 关键 字 为 LI 的 记录 , 故 (LI,17) 无 法 插入 。 

按 关键 字符 串 的 顺序 遍历 树 t: 

(CAI,1)(CAO,2) (CHA,5) (CHANG,6) (CHAO.8) (CHEN,16) (LAN.4)(LI.3)(LIU,14) 
(LONG,11) (WANG,12) (WEN,7) (WU,15) (YANG,10) (YUN,9) (ZHAO,13) 

请 输入 待 查找 记录 的 关键 字符 串 : LIK 

KT 


(D 


QD) (W) 


(I ©) HAE 


2) (5) GO) GG) G) 1 (19 @) (9) 


(11) (12) 


图 8-50 运行 algo8-7. cpp 生成 的 双 链 键 树 t 
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// c8-9.h Trie 键 树 的 存储 结构 。 在 教科 书 第 250 页 
typedef struct TrieNode // Trie 树 类 型 ( 见 图 8-51) 
{ NodeKind kind; 
union 
{ struct 
{ KeyType K; 
Record * infoptr; 
}1f; // 叶子 结 点 
struct 
{ TrieNode * ptr[LENGTH]; // LENGTH 为 结 点 的 最 大 度 , 在 主 程 定义 


int num; // 分 支 结 点 的 孩子 数 
}bh; // 分 支 结 点 
Vy 
} TrieNode, * TrieTree; 


TrieNode _ 
1 1 
1 一 -了 工 一 -! 
LENGTH-1 
ec =。 | 
tkeyl others | TrieTree 0] 
BRANCH | |…| |…| fnum 
TrieTree | | 
T 
=~[LEAFIK| infopt 话 
ee TrieNode( 分 支 结 点 ) 


TrieNode( 叶 子 结 点 ) 
图 8-51 Trie 树 存储 结构 


// c8-10.h 对 两 个 字符 串 型 关键 字 的 比较 约定 为 如 下 的 宏 定义 。 在 教科 书 第 215 页 
音 define FQ(a,b)(!strcmp( (a),(b))) 

间 define LT(a,b)(strcmp((a),(b)) 一 0) 

半 define LO(a,b)(strcmp((a),(b)) 一 =0) 


// bo8-6. cpp Trie 树 的 基本 操作 ,包括 算法 9.16 
void InitDSTable(TrieTree &T) 
{ // 操作 结果 : 构造 一 个 空 的 Trie 树 T( 见 图 8-52) T 
T= NULL; NULL 
} 图 8-52 空 的 Trie 树 全 
void DestroyDSTable(TrieTree &T) 
{ // 初始 条 件 : Trie 树 T 存 在 。 操 作 结 果 : 销毁 T 
int i,j=0; // 已 处 理 的 结 点 数 
i£(T) // 非 空 树 
{ for(i=0;j<T->bh. num&&i<~LENGTH;i++ ) 
if(T ->kind == BRANCH&&T 一 >bh. ptr[i]) // T 是 分 支 结 点 且 第 让 个 结 点 不 空 
{ if(T- 之 bh. ptr[i] -二 kind == BRANCH) // 第 并 个 结 点 是 分 支 结 点 
DestroyDSTable(T -二 bh. ptr[i]); // 递归 销毁 第 并 个 结 点 子 树 
else // 第 让 个 结 点 是 叶子 结 点 
free(T -这 bh. ptr[i]); // 释放 叶子 结 点 
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j++; // 已 处 理 的 结 点 数 +1 
和 
free(T); // 释放 根 结 点 
T= NULL; // 空 指针 赋 0 


} 
Record * SearchTrie(TrieTree T,KeyType K) 
{ // 在 Trie 树 T 中 查找 关键 字 等 于 K 的 记录 。 修 改 算法 9. 16( 见 图 8-53) 
TrieTree p=T; 
int i; 
for(i = 0;p&&p -二 kind == BRANCH&& i<= K.num;p=p->bh.ptr[ord(K.ch[i++ ])]); 
// 对 的 每 个 字符 逐个 查找 , * p 为 分 支 结 点 ,ord() 求 字符 在 字母 表 中 序号 
if(p&&p->kind == LEAF&&EQ(p -二 1f.K.ch,K.ch)) // 查找 成 功 
return p>1f. infoptr; // 返回 关键 字 等 于 k 的 记录 的 地 址 
else // 查找 不 成 功 
return NULL; // 返回 空 
} 
void InsertTrie(TrieTree &T,Record# r) 
{ // 初始 条 件 : Trie 树 了 存 在 ,r 为 待 插入 的 数据 元 素 的 指针 
// 操作 结果 : 车 T 中 不 存在 其 关键 字 等 于 -二 key. ch 的 数据 元 素 , 则 按 关键 字 顺 序 插 到 了 中 
TrieTree p= T,q.ap; 
int i,j,k,n; 


iE(1T) // 空 树 ( 见 图 8-54) 


SANc … | 加 5 
T 
LEAF yy BRANCH 0 < 2 NULL| BRANCH|…|C|… | 
LEAF|LI 上 | -lea RE 
(a) 插入 前 (b) 插入 后 
图 8-53 调用 SearchTrie() 示 例 图 8-54 ” 空 树 调用 InsertTrie() 示 例 


{ T= (TrieTree)malloc(sizeof(TrieNode)); // 动态 生成 Trie 树 结 点 
T 了 -kind = BRANCH; // 结 点 类 型 为 分 支 
for(i=0;i<LENGTH;i++ ) // 指针 数组 赋 初 值 NULL 
T->bh. ptr[i] = NULL; 
T 了 ->bh. num = 1; // 分 支 结 点 的 孩子 数 赋值 1 
p=T->bh. ptr[ord(r ->key. ch[0])] = (TrieTree)malloc(sizeof(TrieNode)); 
// 在 关键 字 首 字符 对 应 的 指针 处 动态 生成 叶子 结 点 
p -kind = LEAF; // 结 点 类 型 为 叶子 
Pp -1f.K=r- 之 key; // 结 点 关键 字 为 数据 元 素 的 关键 字 
p ->1f. infoptr =r; // 结 点 指针 指向 数据 元 素 的 地 址 
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else // 非 空 树 
{ for(i=0;p&&p->kind == BRANCH&&i 一 = 工 ->key.num;+ti) // 在 分 支 结 点 中 查找 插入 位 置 
{ q=p; // q 指 向 p 所 指 结 点 
p=Pp- 二 bh.ptr[ord(r -key.ch[i])]; // p 指 向 第 立 个 关键 字 所 在 的 结 点 
} 
if(1p) // 分 支 空 ( 见 图 8-55) 


一 -一 


AN BRANCH|…||… 


BRANCH[NoTA[ 于 


r 一 [LAN4 [LEAH 中 p- 一 [LEAHLAN| | LeaHL1| | 


r 
(a) 插入 前 (b) 插入 后 
图 8-55 在 空 分支 中 插入 叶子 结 点 


{ p=q->bh.ptr[ord(r -二 key.ch[i-1])]=(TrieTree)malloc(sizeof(TrieNode)); 
// 动态 生成 Trie 树 结 点 
q -之 bh. num++; // 结 点 的 双亲 的 孩子 数 + 1 
p->kind = LEAF; // 结 点 类 型 为 叶子 
pP->1f.K= 工 -key; // 结 点 关键 字 为 数据 元 素 的 关键 字 
p->1f. infoptr=r; // 结 点 指针 指向 数据 元 素 的 地 址 
} 
else // p->kind!= BRANCH 
{ if(EQ(p -二 1f.K.ch,r- 二 key.ch)) //T 中 存在 该 关键 字 
return; // 不 插入 返回 
else // 有 关键 字 部 分 相同 的 叶子 ( 见 图 8-56) 
T 


BRANCH|…] [BRANCH 


LEAF| LI BRANCH|… |1| ap 


BRANCH [| a 


r=[Lu[4 | 


CE 
1 


LEAFL1| | LEAH uru 


(a) 插 入 前 (b) 插入 后 
图 8-56 存在 关键 字 部 分 相同 的 叶子 结 点 
{ for(n = 0;r- 二 key.ch[Ln] ==p- 二 1f.K.chLn];in++ ); // n 为 相同 的 关键 字符 数 


n= 一 

for(k=0;k—=n;k++ ) 

{ ap=q=q->bh.ptr[ord(r ->key.ch[i++ -1])]= (TrieTree)malloc(sizeof 
(TrieNode)); // 动态 生成 Trie 树 结 点 
ap -二 kind = BRANCH; // 结 点 类 型 为 分 支 
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for(j= 0;j 一 LENGTH;j++ ) 
ap -之 bh. ptr[j] = NULL; // 指针 数组 赋 初 值 ROLL 

ap -二 bh.num= 1; // 分 支 结 点 的 孩子 数 赋值 1 
} 
ap -之 bh. nom++; // 分 支 结 点 的 孩子 数 加 1 
ap -之 bh. ptr[ord(p -二 1f.K.ch[i-1])]=p; // 将 x*p 接 入 Trie 树 中 
q=ap->bh.ptr[ord(r ->key.ch[i-1])]= (TrieTree)malloc( sizeof(TrieNode)); 
// 动态 生成 Trie 树 结 点 
qkind = LEAF; // 结 点 类 型 为 叶子 
q->1f.K= 工 ->key;i // 结 点 关键 字 为 数据 元 素 的 关键 字 
q->1f. infoptr =r; // 结 点 指针 指向 数据 元 素 的 地 址 


void TraverseDSTable(TrieTree T,void(# Visit)(Record¥ ) ) 

{ // 初始 条 件 : Trie 树 了 存 在 ,Visit 是 对 记录 指针 操作 的 应 用 函数 
// 操作 结果 : 按 关 键 字 的 顺序 输出 关键 字 及 其 对 应 的 记录 
TrieTree p; 
int i,n=9; // 输出 n 个 元 素 后 换行 
f(T) // 树 T 不 空 

for(i= 0;i 一 LENGTH;i++ ) // 对 T 的 所 有 的 孩子 
{ p=T- 这 bh. ptr[i]; // p 指 向 了 的 第 i 个 孩子 
证 (p&&p -二 kind== LEAF) // T 的 第 并 个 孩子 是 叶子 
{ Visit(p- 二 1f. infoptr); // 访问 该 结 点 所 指 的 记录 
count ++; 
if(count %n== 0) 
printf("\n"); // 输出 n 个 元 素 后 换行 
} 
else if(p&&p -二 kind == BRANCH) // T 的 第 并 个 孩子 是 分 支 
TraverseDSTable(p,Visit); // 对 了 的 第 i 个 孩子 递归 调用 TraverseDSTable() 


// algo8-8. cpp 检验 bo8-6. cpp 的 程序 

间 include"cl.h" 

提 define N 20 // 数组 可 容纳 的 数据 元 素 个 数 

间 define LENGTH 27 // 结 点 的 最 大 度 (0+ 大写 英 文字 母 ) 

struct Others // 记录 的 其 他 部 分 

{ int order; // 整 型 变量 ,顺序 

}s 

间 define Nil 0 // 定义 串 结 束 符 为 0 

static int count = 0; // 调用 TraverseDSTable() 的 次 数 ,初始 为 0 
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间 include"c8-7.h" // 键 树 记 录 的 存储 结构 

间 include"c8-4.h" // 记录 类 型 

间 include"c8-9.h" // Trie 键 树 的 存储 结构 

间 include"c8-10.h" // 对 两 个 字符 串 型 关键 字 的 比较 约定 
int ord(char c) 


{ if(c== Nil) 
return 0; // 遇 字符 串 结束 符 返 回 0 
else 


return toupper(c) -'A'+1; // 英文 字母 返回 其 在 字母 表 中 的 序号 (此 处 不 分 大 小 写 ) 
} 
间 include"bo8-6.cpp" // Trie 树 的 基本 操作 ,包括 算法 9.16 
间 include"func8-7.cpp" // 包括 对 键 树 的 输入 输出 操作 
void main() 
{ 
TrieTree t; 
int i,j=0; // 数据 个 数 ,初始 为 0 
KeyType k; 
Record * p,r[N]; // 记录 数组 
FILE x f; // 文件 指针 类 型 
InitDSTable(t); // 构造 空 的 Trie 树 t 
f= fopen("f8-5.txt","r"); // 打开 数据 文件 £8-5. txt 
do // 将 数据 文件 中 的 记录 依次 读 人 上 并 插入 Trie 树 上 + 中 
{ i=fscanf(f,"%s%d",&r[j].key.ch,&gr[j].others.order); // 由 文件 输入 数据 给 r[j] 
让 (il=-1) // 输入 数据 成 功 
{ r[jj.key. num= strlen(r[j].key.ch); // 给 r[j].key. nun 域 赋值 
p= SearchTrie(t,r[j].key); // 在 Trie 树 t 上 中 查找 关键 字 串 等 于 r[j].key 的 记录 
if(1p) //t 中 不 存在 关键 字 为 r[j].key 的 项 
InsertTrie(t,&r[j++ ]); 
// 将 t[ 订 的 地 址 及 关键 字 串 插入 Trie 树 上 t 中 ,记录 数组 的 数据 个 数 + 1 
else // 在 树 上 中 已 存在 关键 字 为 r[j].key 的 项 
printf(" 树 上 中 已 存在 关键 字 为 %s 的 记录 , 故 (%s,%d) 无 法 插入 。\n"， 
r[j].key. ch,r[j]. key. ch,r[j].others. order); 
} 
} while(!feof(f)&&j<N); // 未 到 数据 文件 的 结尾 且 记录 数组 未 满 
fclose(f); // 关闭 数据 文件 
printf(" 按 关键 字符 串 的 顺序 遍历 树 t: \n"); 
TraverseDSTable(t,Visit); // 按 关键 字符 串 的 顺序 遍历 Trie 树 t 
printf("\n 请 输入 待 查找 记录 的 关键 字符 串 : "); 
InputKey(k.ch); // 输入 待 查找 记录 的 关键 字符 串 给 k. ch 
k. num = strlen(k. ch); // 给 k.num 赋值 
p=SearchTrie(t,k); // 在 Trie 树 t+ 查找 关键 字 等 于 k 的 记录 
if(p) // 存在 该 记录 
Visit(p); // 输出 该 记录 


else // 不 存在 该 记录 
printf(" 未 找到 "); // 输出 未 找到 信息 
printf("\n"); 
DestroyDSTable(t); // 销毁 Trie 树 七 
} 
程序 运行 的 结果 同 algo8-7. cpp 的 运行 结果 ,只 是 图 不 同 ,如 图 8-57 所 示 。 
t T 
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图 8-57 运行 algo8-8. cpp 生成 的 Trie 树 t 


83 哈 希 表 


83.1 处 理 冲 突 的 方法 


由 于 哈 希 函数 是 杂凑 函数 , 它 有 很 大 的 随意 性 ,有 可 能 在 一 个 哈 希 地 址 上 分 配 多 个 数 
据 , 这 种 情况 称 为 冲突 。 处 理 冲突 ,就 是 把 原本 分 配 到 一 个 哈 希 地 址 上 的 多 个 数据 ,根据 某 
种 原则 分 配 到 不 同 的 地 址 上 。 


832 哈 希 表 的 查找 及 其 分 析 


// c8-11.h 开放 定 址 哈 希 表 的 存储 结构 。 在 教科 书 第 259 页 
int hashsize[] = {11,19,29.37); // 哈 希 表 容 量 递增 表 ,一 个 合适 的 素数 序列 
struct HashTable( 见 图 8-58) 


{ ElemType * elem; // 数据 元 素 存储 基 址 ,动态 分 配 数组 
HashTable BiemType 


int count; // 当前 数据 元 素 个 数 elem 十 一 1 
int sizeindex; // hashsize[ sizeindex | 为 当前 容量 count 
a Sizeindex 


间 define SUCCESS 1 图 8-58 ”开放 定 址 哈 希 表 存 储 结构 
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提 define UNSUCCESS 0 
define DUPLICATE —1 


// bo8-7.cpp 哈 希 函数 的 基本 操作 ,包括 算法 9.17 和 算法 9. 18 
void InitHashTable(HashTable &H) 


{ // 操作 结果 : 构造 一 个 空 的 哈 希 表 ( 见 图 8-59) 


十 | [0 
int i; 0 [1] 
H.count = 0; // 当前 元 素 个 数 为 0 wm | 
H. sizeindex = 0; // 初始 存储 容量 最 小 ,为 hashsize[0] [hashsize[0}=1] 
m= hashsize[0]; // 了 哈 希 表 表 长 ,全 局 变量 图 8-59 空 的 哈 希 表 H 
H.elem= (ElemType * )malloc(mx sizeof(ElemType)); 
if( IH. elem) 
exit(OVERFLOW) ; // 存储 分 配 失 败 
for(i=0;i<m;i++ ) 
H. elem[ i]. key = NULL_KEY; // 未 填 记 录 的 标志 
} 
void DestroyHashTable( HashTable &H) 
{ // 初始 条 件 : 哈 希 表 日 存在 。 操 作 结 果 : 销毁 哈 希 表 H( 见 图 8-60) 
free(H. elem); // 释放 H. elen 的 存储 空间 
H. elem = NULL; NULL 
H.count = 0; 0 
H. sizeindex = 0; 0 
) 再 
unsigned Hash( KeyType K) 图 8-60 ”销毁 的 哈 希 表 HH 


{ // 一 个 简单 的 哈 希 函数 (nm 为 表 长 ,全 局 变量 ) 
return KSm; 

} 

int d(int i) // 增 量 序列 函数 .在 以 下 3 行 中 根据 需要 选取 1 行 , 其 余 2 行 作为 注释 

{ return i; // 线性 探测 再 散 列 

//return((i+1)/2) * ((i+1)/2) x (int)pow( 一 1,i-1); // 二 次 探测 再 散 列 

//return rand(); // 伪 随 机 探测 再 散 列 

} 

void collision(KeyType K,int &p,int i) 

{ p= (Hash(K) + d(i))%m; // 开放 定 址 法 处 理 冲突 

} 

Status SearchHash(HashTable H,KeyTYPe K,int&p,int&c) 

{ // 在 开放 定 址 哈 希 表 阳 中 查找 关键 字 为 K 的 元 素 , 若 查找 成 功 ,以 p 指示 待 查 数 据 
// 元 素 在 表 中 位 置 ,并 返回 SUCCESS; 否则 ,以 p 指示 插入 位 置 .并 返回 UNSUCCESS 
//c 用 以 计 冲 突 次 数 ,其 初 值 置 零 , 供 建 表 插 入 时 参考 。 修 改 算法 9.17 
p= Hash(K); // 求 得 哈 希 地 址 
while(H. elem[p].key!= NULL KEY&&1IEO(K,H.elem[p].key)) 

{ // 该 位 置 中 填 有 记录 .并 且 与 待 查找 的 关键 字 不 相等 
ctt+i // 计 冲 突 次 数 +1 
f(c<m) // 在 日 中 有 可 能 找到 插入 地 址 ,修改 
collision(K,p,c); // 求 得 下 一 探查 地 址 p 
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else // 在 了 中 不 可 能 找到 插入 地 址 
break; // 退出 while 循环 
} 
证 EQ(K,H. elem[pj].key) // 查找 成 功 
return SUCCESS; // p 返回 待 查 数据 元 素 位 置 
else // 查找 不 成 功 
return UNSUCCESS; // H.elem[p].key == NULL KEY,p 返回 的 是 插入 位 置 
} 
void RecreateHashTable(HashTable&g); // 对 函数 RecreateHashTable( ) 的 声明 
Status InsertHash(HashTable &H.ElemType e) 
{ // 查找 不 成 功 时 插入 数据 元 素 e 到 开放 定 址 哈 希 表 了 中 ,并 返回 OK; 
// 车 冲突 次 数 过 大 , 则 重建 哈 希 表 , 算 法 9.18 
int p,c= 0; // 冲突 次 数 ,初始 为 0 
证 (SearchHash(H,e.key,p,c)) // 查找 成 功 
return DUPLICATE; // H 中 已 有 与 < 有 相同 关键 字 的 元 素 ,不 再 插入 
else if(c 一 hashsize[H. sizeindex]/2) // 未 找到 ,冲突 次 数 也 c 未 达到 上 限 ,(c 的 阀 值 可 调 ) 
{ H.elem[p]=e; // 在 8 中 插入 数据 元 素 e 
++ H.count; // 了 的 数据 元 素 个 数 + 1 
return OK; // 插入 成 功 
} 
else // 未 找到 ,但 冲突 次 数 c 已 达到 上 限 
{ RecreateHashTable(H); // 重建 哈 希 表 
return UNSUCCESS; // 插入 不 成 功 , 需 重新 插入 


} 
void RecreateHashTable( HashTable &H) 
{ // 重建 哈 希 表 旧 
int i,count = H.count; // H 中 原 有 数据 个 数 
ElemType * p, * elem= (ElemType * )malloc(count * sizeof(ElemType)); 
// 动态 生成 存放 哈 希 表 瑟 原 有 数据 的 空间 
p= elem; // p 指 向 elem 
for(i=0;i<m;i++ ) // 将 H 原 有 的 第 1 个 数据 到 最 后 1 个 数据 ,保存 到 elen 中 
if((H. elem + i) ->key!= NULL_KEY) // 日 在 该 单元 有 数据 
* p++ =# (H.elem+i); // 将 数据 依次 存 人 elem 
H.count = 0; // 8 的 当前 数据 元 素 个 数 为 0 
H. sizeindex++; // 增 大 存储 容量 为 下 一 个 序列 数 
m= hashsize[H. sizeindex]; // 新 的 存储 容量 
H.elem = (ElemType * )realloc(H. elem.m* sizeof(ElemType)); 
// 以 新 的 存储 容量 重新 生成 空 哈 希 表 旧 
for(i=0;i<m;i++ ) 
H. elem[ i].key = NULL KEY; // 未 填 记 录 的 标志 (初始 化 ) 
for(p= elem;p<<elem+ count;p++ ) // 将 原 有 的 数据 按照 新 的 表 长 插入 到 重建 的 哈 希 表 中 
InsertHash(H, * p); 
free(elem) ; // 释放 elen 的 存储 空间 
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void TraverseHash(HashTable H.void(# Visit)(int.ElemType)) 
{ // 按 哈 希 地 址 的 顺序 遍历 哈 希 表 划 

int i; 

printf(" 哈 希 地 址 0 一 名 d\n" ,m 一 1); 

for(i=0;i<<m;i++ ) // 对 于 整个 哈 希 表 昌 

if(H. elem[i].key!= NULL_KEY) // H 在 第 i 个 单元 有 数据 
Visit(i,H.elem[i]); // 访问 第 i 个 数据 

} 


f8-6. txt 内 容 如 下 : 


2171 
602 
293 
38 4 
介 与 
26 
Ek 
48 
609 
13 10 


// algo8-9. cpp 检验 bo8-7. cpp 的 程序 
间 include"cl.h" 
并 define NULL_KEY 0 // 0 为 无 记录 标志 
提 define N 15 // 数组 可 容纳 的 数据 元 素 个 数 
int m; // 哈 希 表 表 长 ,全 局 变量 
typedef int KeyType; // 定义 关键 字 域 为 整 型 
struct ElemType // 数据 元 素 类 型 
{ KeyType key; 
int order; 
}s 
间 include"c8-2.h" 
间 include"c8-11.h" 
间 include"bo8-7. cpp" 
void Visit(int p.ElemType r) 
{ printf("address =%d(%d,%d)\n",.p,r. key.r. order); 
} 
void main() 
{ 
ElemType r[N]; // 记录 数组 
HashTable h; 
int i,n,p=0; 
Status j; 
KeyType k; 


} 


FILE xf; // 文件 指针 类 型 
f= fopen("f8-6.txt","r"); // 打开 数据 文件 f8-6. txt 
do // 将 数据 文件 中 的 记录 依次 读 人 记录 数组 上 
{ i= fscanf(f,"%dgd",&r[p].key,&r[p].order); // 由 文件 输入 数据 给 r[p] 
ifE(Cil=-1) // 输入 数据 成 功 
pit+s 
} while(!feof(f)&&p<N);，// 未 到 数据 文件 的 结尾 且 记录 数组 未 满 
fclose(f); // 关闭 数据 文件 
InitHashTable(h); // 构造 一 个 空 的 哈 希 表 h 
for(i=0;i<p-1;i++) 
{ j= InsertHash(h,r[i]); // 在 h 中 插入 前 p-1 个 记录 (最 后 1 个 记录 不 插入 ) 
if(j == DUPLICATE) 
printf(" 表 中 已 有 关键 字 为 $d 的 记录 ,无 法 再 插入 记录 (%d, gsd)\n"， 
r[il].key,r[il].key,r[il].order); 
} 
printf(" 按 哈 希 地 址 的 顺序 遍历 哈 希 表 : \n"); 
TraverseHash(h,Visit); // 按 哈 希 地 址 的 顺序 遍历 哈 希 表 h 
printf(" 请 输入 待 查找 记录 的 关键 字 : ")， 
scanf("%d",&k); // 输入 待 查找 记录 的 关键 字 
j= SearchHash(h,k,p,n); // 查找 时 mn 值 无 用 
if(j == SUCCESS) // 查找 成 功 
Visit(p,h.elem[p]); // 输出 该 纪录 
else // 查找 失败 
printf(" 未 找到 \n"); // 输出 未 找到 信息 
j= InsertHash(h,r[i]); // 插入 最 后 1 个 记录 ( 需 重建 哈 希 表 ) 
if(j == ERROR) // 重建 哈 希 表 
j= InsertHash(h,r[i]); // 重建 哈 希 表 后 重新 插入 
printf(" 按 哈 希 地 址 的 顺序 遍历 重建 后 的 哈 希 表 : \n"); 
TraverseHash(h,Visit); // 按 哈 希 地 址 的 顺序 遍历 哈 希 表 h 
printf(" 请 输入 待 查找 记录 的 关键 字 :"); 
scanf("%d",&k); // 输入 待 查找 记录 的 关键 字 
j= SearchHash(h,k,p,n); // 查找 时 mn 值 无 用 
i£(j == SUCCESS) // 查找 成 功 
Visit(p,h.elem[p]); // 输出 该 纪录 
else // 查找 失败 
printf(" 未 找到 \n"); // 输出 未 找到 信息 
DestroyHashTable(h); // 销毁 哈 希 表 


程序 运行 结果 (以 教科 书 中 图 9. 25 为 例 ) : 
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表 中 已 有 关键 字 为 60 的 记录 ,无 法 再 插入 记录 (60,9) 
按 哈 希 地 址 的 顺序 遍历 哈 希 表 : ( 见 图 8-61(a)) 
哈 希 地 址 0 一 10 

address=1 (1,5) 

address=2 (2,6) 

address=3 (3,7) 

address = 4 (4,8) 

address = 5 (60.2) 

address = 6 (17,1) 

address = 7 (29.3) 

address = 8 (38.,4) 

请 输入 待 查找 记录 的 关键 字 : 13x 

未 找到 

按 喻 希 地 址 的 顺序 遍历 重建 后 的 喻 希 表 : 
哈 希 地 址 0 一 18( 见 图 8-61(b)) 
address=0 (38,4) 

address=1 (1,5) 

address=2 (2.6) 

address=3 (3,7) 

address = 4 (4,8) 

address = 5 (60,2) 

address = 10 (29.3) 

address = 13 (13,10) 

address = 17 (17,1) 

请 输入 待 查找 记录 的 关键 字 : 13x 
address=13 (13,10) 


上 一 | 38| 4 
9 1| 5 
1 al :6 
h 3| 7 
4| 8 
[60| 2| 
00 | 
0 
| 0 0] 0 
8 1|5 0 0 
0 2|6 ID] 29| 3 
h 3|7 IB] 0 
4| 8 [4] 0 
60| 2 [5] 13 | 10 
17| 1 |[6] 0 
2913 ID] [0 | 
38 | 4 |[8] 0 
0 9] 17| 1 
0 10] 0 
(a) 重建 前 (b) 重建 后 
图 8-61 h 的 存储 情况 


91 概 述 


排序 就 是 把 一 组 数据 按 关 键 字 的 大 小 有 规律 地 排列 。 经 过 排序 的 数据 更 易于 查找 。 所 
谓 内 部 排序 ,就 是 先 把 待 排序 数据 都 放 到 内 存 中 ,再 进行 排序 。 


// c9-1.h 待 排 记录 的 数据 类 型 。 在 教科 书 第 264 页 RedType 
struct RedType // 记录 类 型 ( 见 图 9-1) key | otherinfo 
{ KeyType key; // 关键 字 项 ,具体 类 型 在 主 程 中 定义 图 9-1 记录 类 型 
， InfoType otherinfo; // 其 他 数据 项 ,具体 类 型 在 主 程 中 定义 
Wy SqList 

r | key | otherinfo | [0] 
// c9-2.h 顺序 表 类 型 的 存储 结构 。 在 教科 书 第 264 页 上 
并 define MAX_SIZE 20 // 一 个 用 作 示例 的 小 顺序 表 的 最 大 长 度 
struct SqList // 顺序 表 类 型 ( 见 图 9-2) 
{ RedType r[MAX_SIZE+1]; // r[0] 闲 置 或 用 作 哨兵 单元 [MAX_SIZE] 

int length; // 顺序 表 长 度 length 


}; 图 9-2 顺序 表 存 储 结构 


92 插入 排序 


92.1 直接 插入 排序 


// bo9-1. cpp 顺序 表 插 入 排序 的 函数 (3 个 ) ,包括 算法 10.1 和 算法 10.2 
void InsertSort(SqList&L) 
{ // 对 顺序 表 工 作 直接 插入 排序 。 算 法 10.1 
int i,j; 
for(i=2;i<=L.1length;+ti) // 从 第 2 个 记录 到 最 后 一 个 记录 
if LT(L.r[i.key,L.r[i- 1].key) // 当前 记录 二 前 一 个 记录 
{ // 将 .rt[ 订 插入 [1..i-1] 的 有 序 子 表 中 
LL.r[0]= 工 .r[i]; // 将 当前 记录 复制 为 哨兵 ( 存 人 [0j 中 ) 
for(j=i-1;LT(L.r[0].key,L.r[j].key) ;一 j) // 有 序 子 表 从 后 到 前 , 若 哨兵 小 于 记录 
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L.r[j+1]=L.r[jj; // 记录 后 移 1 个 单元 
L.r[j+1i]=L.r[0]; // 将 哨兵 (当前 记录 ) 插 入 到 正确 位 置 


} 
void BInsertSort(SqList &L) 
{ // 对 顺序 表 工 作 折 半 插入 排序 。 修 改 算法 10.2 
int i,j,m,low,high; 
for(i= 2;i<= .length;+fi) // 从 第 2 个 记录 到 最 后 一 个 记录 
证 LTGL.r[i 订 .key,L.r[i- 1].key) // 当前 记录 二 前 一 个 记录 ,加 此 句 
{ // 将 L.r[ 记 插入 [1..i-1] 的 有 序 子 表 中 
5.r[0]=L.r[i]; // 将 L.r[i] 暂 存 到 工 .r[0] 
low=1; // 插入 区 间 的 低 端 
high=i-1; // 插入 区 间 的 高 端 
while(low 二 = high) // 在 r[low. .highb] 中 折 半 查找 有 序 插 入 的 位 置 
{ m= (low+ high)/2; // 折 半 (中 点 位 置 m) 
证 LT(L.r[0].key,L.r[m].key) // 关键 字 小 于 中 点 关键 字 
high=m-1; // 插入 点 在 低 半 区 
else // 关键 字 大 于 等 于 中 点 关键 字 
low=m+1; // 插入 点 在 高 半 区 
} // low>high, 退 出 while 循环 ,[high+ 1] 是 插入 位 置 
for(j=i-1;j>= high+1; 一 j) // 有 序 子 表 从 后 到 前 
L.r[j+1]=L.r[j]j; // 记录 后 移 
L.r[high+1]=L.r[0]; // 插入 到 [high+1] 


} 
void P2 InsertSort(SqList &L,int flag) 
{ // 2- 路 插入 排序 (flag= 0) 和 改进 的 2- 路 插入 排序 (flag=1, 当 L.r[1] 是 待 排序 记录 中 关键 字 
// 最 小 或 最 大 的 记录 时 , 仍 有 优越 性 ) 
int i,j,first,final ,mid= 0; 
RedType * ds 
d= (RedType * )malloc(L. length * sizeof(RedType)); // 生成 L. length 个 记录 的 临时 空间 
dLoj=L.r[1]; // 设 工 的 第 1 个 记录 为 d 中 排 好 序 的 记录 (在 位 置 Lo]) 
first = final = 0; // first、final 分 别 指示 d 中 排 好 序 的 记录 的 第 1 个 和 最 后 1 个 记录 的 位 置 
for(i= 2;i<=L.length;++i) // 依次 将 工 的 第 2 个 ~ 最 后 1 个 记录 插入 d 中 
{ 证 (flag) // 改进 的 2- 路 插入 排序 ,每 次 插入 前 都 求 mid 
{ if(first>final) 
j=L. length; // j 是 调整 系数 
else 
j=0; 
mid= (first +final+j)/2%L. length; // d 的 中 间 记 录 的 位 置 
. 
if(L.r[i].key 二 d[mid]. key) // 待 插 记录 将 插 在 d 的 前 半 部 分 中 (flag= 0 时 ,mid= 0) 
{ j=first; // j 指 向 d 的 第 1 个 记录 
first = (first —1+L.length) %L.length; // first 前 移 


while(L.r[i].key>d[j].key) // 待 插 记 录 大 于 j 所 指 记录 
{ d[LGj-1+L.length) %L.length] = d[j]; // j 所 指 记录 前 移 
j= (j+1) %L.length; // j 指向 下 1 个 记录 
} 
d[(j-1+L.length) %L.length] =L.r[i]; // 移动 结束 , 待 插 记 录 插 在 [jj] 前 
else // 待 插 记 录 将 插 在 后 半 部 分 中 
{ j= final++; // 了 指向 当前 的 最 后 1 个 记录 ,final 指向 插入 后 的 最 后 1 个 记录 
while(L.r[i].key<d[j].key) // 待 插 记录 小 于 j 所 指 记录 
{ d[(j+1)%L.1length]=d[j]; // j 所 指 记录 后 移 ,flag = 0 时 不 必 求 余 
j= (j-1+L.1length) %L. length; // j 指 向 上 1 个 记录 ,flag= 0 时 不 必 求 余 
} 
d[(j+1) %L. length] =L.r[i]; 
// 待 插 记录 不 小 于 j 所 指 记录 , 插 在 j 后 ,flag=0 时 不 必 求 余 


\ 
了 


} 
for(i=1;i<=L.length;i++ ) // 把 在 d 中 排 好 序 的 记录 依次 赋 给 L. 
L.r[i]=d[(first+i-1)%L.1length]; // 线性 关系 
free(d); // 释放 d 所 指 的 存储 空间 
} 
// func9-1. cpp 与 KeyType 和 InfoType 均 为 整 型 情况 配套 的 输入 输出 函数 
void Print(SqList L) // 输出 顺序 表 
{ int i; 
for(i=1;i<~ =L.length;i++) 
printf("(%d, %d)",L.r[il].key,.L.r[i].otherinfo); 
printf("\n"); 
} 
void InputFromFile(FILE#f,RedType &c) // 从 文件 输入 记录 的 函数 
{ fscanf(f,"% dg% d",&c.key,&c.otherinfo); 
} 


数据 文件 f9-1. txt 的 内 容 如 下 : 


8 

491 
38 2 
653 
97 4 
76 5 
13 6 
2 
498 


// algo9-1. cpp 检验 bo9-1. cpp 的 程序 
间 include"c1.h" 
间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 
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typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 
typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 
间 include"c9-1.h" // 记录 的 数据 类 型 
间 include"c9-2.h" // 顺序 表 类 型 的 存储 结构 
间 include"bo9-1.cpp"”// 3 个 顺序 表 插入 排序 的 函数 ,包括 算法 10.1 和 算法 10.2 
间 include"func9-1. cpp" // 配套 的 输入 输出 函数 
void main() 
{ 
FILE xf; // 文件 指针 类 型 
SqList ml,m2,m3,m4; // 4 个 顺序 表 变 量 
int i; 
f= fopen("f9-1.txt","r"); // 打开 数据 文件 f9-1. txt 
fscanf(f,"%d",&ml.length); // 由 数据 文件 输入 数据 元 素 个 数 给 m1. length 
for(i=1;i<=ml.length;i++ ) // 给 ml.r 赋 值 
InputFromFile(f,ml.r[i]); // 由 数据 文件 输入 数据 元 素 的 值 并 赋 给 m1. r[i] 
fclose(f); // 关闭 数据 文件 
m2=m3=m4=ml; // 复制 顺序 表 ml 到 m2、m3、m4, 使 之 与 ml 相同 
printf(" 排 序 前 : \n"); 
Print(m1); // 输出 排序 前 的 顺序 表 
InsertSort(m1); // 对 ml 调用 直接 插入 排序 法 
printf(" 直 接 插入 排序 后 : \n"); 
Print(m1); // 输出 排序 后 的 ml 
BInsertSort(m2); // 对 m2 调用 折 半 插入 排序 法 
printf(" 折 半 插 入 排序 后 : \n"); 
Print(m2); // 输出 排序 后 的 m2 
P2_InsertSort(m3,0); // 对 m3 调用 2- 路 插入 排序 法 
printf("2- 路 插入 排序 后 : \n"); 
Print(m3); // 输出 排序 后 的 m3 
P2_InsertSort(m4,1); // 对 m4 调用 改进 的 2- 路 插入 排序 法 
printf(" 改 进 的 2- 路 插入 排序 后 : \n"); 
Print(m4); // 输出 排序 后 的 m4 
} 


程序 运行 结果 (以 教科 书 中 式 10-4 的 数据 为 例 ) : 


排序 前 : 
(49,1)(38,2)(65,3)(97,4)(76,5)(13,6)(27,7)(49,8) 
直接 插 和 人 排序 后 : 
(13,6)(27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 
折 半 插入 排序 后 : 
(13,6)(27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 
2- 路 插入 排序 后 : 
(13,6)(27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 
改进 的 2- 路 插入 排序 后 : 
(13,6)(27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 


922 其 他 插入 排序 


折 半 插入 排序 和 2- 路 插入 排序 在 bo9-1. cpp 中 。 


// c9-3.h 静态 链表 类 型 。 在 教科 书 第 268 页 
并 define SIZE 100 // 静态 链表 容量 
struct SLNode // 表 结 点 类 型 ( 见 图 9-3) 
{ RedType rc; // 记录 项 
int next; // 指针 项 
}; 
struct SLinkListType // 静态 链表 类 型 ( 见 图 9-4) 
{ SLNode r[SIZE]; // 0 号 单元 为 表 头 结 点 
int length; // 链表 当前 长 度 


// func9-2. cpp 包括 算法 10.18 
void Sort(SqList L,int adr []) 


~ 


SLNode 


内 部 排序 


re. key rc. otheril 


nfo 


next 


图 9-3 表 结 点 类 型 


SLinkListType 


next 


[0] 


re. key! rc. otherinfo 


[1] 


[SIZE—1] 


length 


图 9-4 静态 链表 存储 结构 


{ // 求 得 adr[1..L.1length],adr[i] 为 静态 链表 工 的 第 i 个 最 小 记录 的 序号 


int i=1,p=L.r[0].next; // p 指 向 第 1 个 记录 

while(p) // 未 到 链表 尾 

{ adr[i++]=p; // 将 p 赋 给 adr[i],i+1 
p=L.r[Lp].next; // p 指 向 下 一 个 记录 


} 
void Rearrange(SqList &L,int adr[ ]) 


{ // adr 给 出 静态 链表 工 的 有 序 次 序 , 即 .r[adr[i] 是 第 并 小 的 记录 。 


// 本 算法 按 adr 重 排 DZ.z, 使 其 有 序 。 算 法 10.18 
int i,j,k; 


for(i= 1;i<L.lengthi++i) // 从 顺序 表 的 第 1 个 记录 到 倒数 第 2 个 记录 


if(adr[i]!= i) // 记录 不 在 正确 位 置 
4 


L.r[0] = 工 .rt[i]; // 暂 存 记录 [ 订 到 [0]( 空 出 [ 订 或 [让 来 


while(adr[j]!= i) // 记录 不 在 正确 位 置 


{ // 调整 LrLadr[jj]] 的 记录 到 位 ,直到 adr[j] = 为止 


k=adr[j]; 


5.r[j] = 工 .rt[kj]; // 将 [ 订 中 应 放 的 记录 移 来 ( 因 [] 空 ) 


adr[j] = j; // 记录 处 于 正确 位 置 的 标志 
j=k; // 新 空 出 的 位 置 赋 给 j, 以 便 继 续 循环 调整 
} 


EL.zr[ 订 =L.r[0]; // 循环 调整 完毕 ,将 暂 存在 [0] 的 记录 赋 给 L.[j] 


adr[j] =j; 
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// algo9-2. cpp 表 插 入 排序 ,包括 算法 10.3 
间 include"cl.h" 
typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 
typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 
间 include"c9-1.h" // 记录 的 数据 类 型 
间 include"c9-3.h" // 静态 链表 类 型 
typedef SLinkListType SqList; // 定义 算法 10.18 中 的 SqList 类 型 为 SLinkListType 类 型 
间 include"func9-2.cpp" // 算法 10.18 
void PrintL(SLinkListType L) // 按 顺序 结构 输出 静态 链表 的 函数 
{ int is 
for(i=0;i<=L.length;i++ ) 
printf("i=%d key =%d ord=%d next =%d\n",i,L.r[il].rc.key, 
L.r[il].rc.otherinfo,L.r[i].next); 
} 
void InputFromFile(FILE# f,RedTYpe &c) // 从 文件 输入 记录 的 函数 
{ fscanf(f,"%d%d",&c.key,&c. otherinfo); 
} 
void CreatTableFromFile(SLinkListType &SL,FILE#%f£) 
{ // 由 数据 文件 王建 立 未 排序 的 顺序 表 SL(next 域 不 起 作用 ) 
int i; 
fscanf(f,"%d",&SL. length); // 由 文件 输入 表 长 
for(i=1;i< 一 = SL. length;i++ ) 
InputFromFile(f,SL.r[i.rc); // 依次 由 文件 输入 记录 到 SL.r[i].rc 
} 
void MakeTableSorted( SLinkListType &SL) 
{ // 使 无 序 的 顺序 表 SL 成 为 有 序 的 静态 循环 链表 
int i,p,q; 
SL. r[0].rc.key= INT_MAX; // 表 头 结 点 记录 的 关键 字 取 最 大 整数 ( 非 降序 循环 链表 的 表 尾 ) 
SL.r[L0].next = 0; // next 域 为 0 形成 空 循环 链表 ,初始 化 
for(i=1;i<= SL. length;i++ ) // 依次 将 SL 中 的 数据 插入 到 静态 循环 链表 中 
{ q= 0; // q 指 向 静态 链表 的 表 头 元 素 
p= SL.r[0].next; // p 指 向 静态 链表 的 第 1 个 元 素 
while(SL.r[p].rc.key 一 = SL. r[i].rc.key) // 静态 链表 向 后 移 
{ // p 所 指 元 素 的 关键 字 不 大 于 待 插 记 录 的 关键 字 ( 上 行 的 = ”使 排序 方法 是 稳定 的 ) 
q=p; // q 指 向 p 所 指 元 素 
p= SL.r[p].next; // p 指 向 下 1 个 元 素 
} // p 所 指 元 素 的 关键 字 大 于 待 插 记录 的 关键 字 .q 所 指 元 素 的 关键 字 不 大 于 待 插 记录 的 关键 字 
SL.r[qj.next = i; // 将 当前 记录 插入 静态 链表 (gq 后 p 前 ) 
SL.r[il].next =p; 


} 
void Arrange(SLinkListType &SL) 


{ // 根据 静态 链表 SL 中 各 结 点 的 指针 值 调 整 记录 位 置 ,使 得 SLC 成 为 非 递减 有 序 的 顺序 表 。 算 法 10.3 


int i,p,q; 
SLNode t; 
p= SL.r[0].next; // p 指 示 第 1 个 记录 的 当前 位 置 
for(i=1;i<SL. length;++i) 
{ // SL.r[1..i-1] 中 记录 已 按 关键 字 有 序 排列 ,第 i 个 记录 在 SL 中 的 当前 位 置 应 不 小 于 
while(p<<i) // p 所 指 的 记录 已 排 好 序 
p= SL.r[pj.next; // 继续 向 后 找 ,跳出 已 排 好 序 的 部 分 
q= SL.r[p].next; // q 指示 尚未 调整 的 表 尾 部 分 
if(p!l= i) // 第 谋 个 记录 不 恰好 在 p 所 指 的 位 置 , 需 移 动 
{ t= SL,r[pj]; // Pp 和 i 交换 记录 ,使 第 个 记录 到 位 
SL.r[p] = SL.r[i]; 
SL.r[i]=t; 
SL.T[ .next = p; // 指向 被 移 走 的 记录 .[i] 已 排 好 序 , 使 得 以 后 可 由 while 循环 找 回 p 所 指 记录 
} 
p= q; // p 指 示 尚 未 调整 的 表 尾 部 分 ,为 找 第 i+1 个 记录 作 准 备 


} 
void main() 
{ 
FILE x f; // 文件 指针 类 型 
int xadr,i; 
SLinkListType ml ,m2; // 2 个 静态 链表 变量 
f= fopen("f9-1.txt","r"); // 打开 数据 文件 f9-1. txt 
CreatTableFromFile(ml,f); // 由 数据 文件 三 建立 未 排序 的 顺序 表 
fclose(f); // 关闭 数据 文件 
printf("ml 排序 前 : \n"); 
PrintL(m1); // 输出 排序 前 的 顺序 表 ml 
MakeTableSorted(m1); // 使 无 序 的 顺序 表 ml 成 为 有 序 的 静态 链表 
m2 = ml; // 复制 静态 链表 ml, 使 m2 与 ml 相同 
printf("ml .m2 链 式 有 序 后 : \n"); 
PrintL(m1); // 输出 链 式 有 序 的 顺序 表 ml 
Arrange(m1); // 将 链 式 有 序 的 顺序 表 ml 重 排 为 有 序 的 顺序 表 
printf("ml 排序 后 : \n"); 
PrintL(m1); // 输出 排序 后 的 顺序 表 ml 
adr = (int x )malloc((m2. length+1) * sizeof(int)); // 动态 生成 adr 数组 
Sort(m2,adr); // 求 得 adr[1. .m2.1length],adr[i] 为 静态 链表 m2 的 第 并 个 最 小 记录 的 序号 
for(i= 1;i<=m2.length;i++ ) // 依次 输出 adr[ 订 
{ printf("adr[ %d] =%d",i,adr[i]); 
if(i%4== 0) 
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printf("\n"); 
} 


Rearrange(m2,adr); // 按 adr[] 重 排 m2.r, 使 其 成 为 有 序 的 顺序 表 


printf("m2 排序 后 : \n"); 


PrintL(m2); // 输出 排序 后 的 顺序 表 m2 
free(adr); // 释放 adr 所 指 的 存储 空间 


} 


程序 运行 结果 (以 教科 书 中 图 10. 3 和 图 10. 4 的 数据 为 例 ) : 


ml 排序 前 :( 见 图 9-5) 


ml vm2 链 式 有 序 后 : ( 见 图 9-6) 


i=1 key=49 ord=1 next=8 
i=2 key=38 ord=2 next=1 
i=3key=65 ord=3 next=5 
i=4key=97 ord=4 next=0 
i=5 key=76 ord=5 next=4 
i=6 key=13 ord=6 next=7 
i=7 key=27 ord=7 next =2 
i=8 key= 49 ord=8 next=3 
ml 排序 后 :〈 见 图 9-7) 


i=1 key=13 ord=6 next=6 
i=2 key=27 ord=7 next=7 
i=3 key=38 ord=2 next=7 
i=4key=49 ord=1 next=6 
i=5 key=49 ord=8 next =8 
i=6 key=65 ord=3 next=7 
i=7 key=76 ord=5 next=8 
i=8 key=97 ord=4 next=0 


i=0 key= 29793 ord = 8293 next = 26980 
i=1 key=49 ord=1 next= 14368 
i=2 key= 38 ord= 2 next = 28265 
i=3 key=65 ord=3 next= 25376 
i=4key=97 ord=4 next = 25927 
i=5 key=76 ord=5 next = 25972 
i=6 key=13 ord=6 next = 25445 
i=7 key= 27 ord=7 next = 14386 
i=8 key= 49 ord= 8 next = 26988 


i=0 key= 32767 ord= 8293 next =6 


i=0 key= 32767 ord= 8293 next =6 


adr[1] =6 adr[2]=7 adr[3] =2 adr[4]=1 
adr[5] =8 adr[6]=3adr[7]=5adr[8]=4 


ml 
: [0] 
49 ;1 [1] 
38: 2 [2] 
65; 3 [3] 
97 ; 4 [4] 
76: 5 [5] 
131 6 [6] 
:7 [7] 
49 ;8 [8] 
[99] 
8 
ml 排序 前 


wwelolalc|ols 
= 
A 
jd 


ml、m2 
: [0] 
13:6 [1] 
本 [2] 
38 ; 2 [3] 
49 ; 1 [4] 
49: 8 [5] 
65: 3 [6] 
76; 5 [7] 
97 ; 4 [8] 
[99] 


图 9-7_ml 、m2 排序 后 


小 
© 
几 
也 
型 
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m2 排序 后 : ( 见 图 9-7 和 图 9-8) 
i=0 key=49 ord=1 next=8 


i=1 key=13 ord=6 next=7 


i=2 key=27 ord=7 next=2 


i=3 key=38 ord=2 next=1 


i=4key=49 ord=1 next=8 


i=5 key= 49 ord=8 next=3 


四国 四 加 四 四 加 加 
- 


i=6 key=65 ord=3 next=5 


i=7 key=76 ord=5 next=4 | 


i=8 key=97 ord=4 next=0 


oo 


图 9-8 ”m2 排序 过 程 


图 9-8 说 明了 m2 调用 算法 10. 8,Rearrange() 函 数 的 排序 过 程 : 当 adr[1] 不 等 于 1( 第 
1 个 记录 没有 到 位 ) 时 , 先 将 占据 [1] 的 记录 移 到 空位 L0] (步骤 @), 再 将 Cadr[1]] 移 到 [1] 
(步骤 @@) ,修改 adr[1] 等 于 1, 标志 第 1 个 记录 已 经 到 位 。 这 时 ,第 1 个 记录 原先 所 占 的 位 
置 又 空 了 ,继续 前 面 的 步骤 ,在 空位 中 移入 合适 的 记录 (步骤 四 一 @@) 。 步 又 四 将 [4] 中 的 97 
移 到 [8] 后 ,根据 adr[4]=1, 应 将 [1 中 的 记录 移 到 [4]。 但 此 时 adr[1] 二 1, 说 明 [1] 中 的 记 
录 已 经 移 人 合适 的 记录 了 , 原 [1] 中 的 记录 必定 在 [0]。 将 [0] 中 的 记录 移入 [4] ,完成 了 一 
个 调整 记录 位 置 的 小 循环 。 函数 Rearrange() 经 过 这 样 一 个 while 循环 ,并 不 能 保证 所 有 记 
录 都 移入 正确 的 位 置 。 再 到 while 循环 外 面 的 for 循环 中 找到 下 一 个 未 到 正确 位 置 的 记录 ， 
继续 这 样 的 调整 ,直至 所 有 记录 都 排 到 正确 位 置 。 


923 希 尔 排序 


// algo9-3. cpp 希 尔 排序 ,包括 算法 10.4 和 算法 10.5 
音 include 二 stdio.h> 
间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 
typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 
typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 
间 include"c9-1.h" // 记录 的 数据 类 型 
间 include"c9-2.h" // 顺序 表 类 型 的 存储 结构 
间 include"func9-1.cpp" // 配套 的 输入 输出 函数 
void Print1(SqList L) // 输出 顺序 表 工 的 关键 字 
{ int i; 
for(i=1;i<~=L.length;i++ ) 
printf("%d",L.r[il].key); 
printf("\n"); 
} 
void ShellInsert(SqList &L,int dk) 
{ // 对 顺序 表 工 作 一 趟 希 尔 插入 排序 。 本 算法 和 一 趟 直接 插入 排序 相 比 , 作 了 以 下 修改 : 
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// 1. 前 后 记录 位 置 的 增 量 是 dk, 而 不 是 1; 
// 2.r[0] 只 是 暂 存单 元 ,不 是 哨兵 。 当 j<= 0 时 ,插入 位 置 已 找到 。 算 法 10.4 
int i,j; 
for(i= dk+1;i<=L.length;+ti) // 从 与 第 1 个 记录 相差 增 量 dk 的 记录 到 表 尾 
证 LT(L.r[i 计 .key,L.r[i- dk].key) // 关键 字 小 于 前 面 记录 的 ( 按 增 量 ) 
{ // 以 下 将 工 .r[ 订 插入 有 序 增 量子 表 
L.r[0] =L.r[i; // 当前 记录 暂 存 在 工 .r[0] 
for(j=i- dk;j>0&&LT(L. r[0]. key,L. r[j]. key);j -= dk) 
L.r[j+ dk]=L.r[j]; // 记录 后 移 , 查 找 插入 位 置 
L.r[j+ dk] =L.r[o]; // 插入 
} 
} 
void ShellSort(SqList &L,int dlta[] ,int t) 
{ // 按 增 量 序列 dltaL0..t- 菇 对 顺序 表 工 作 希 尔 排 序 。 算 法 10.5 
int k; 
for(k = 0;k< 一 t;+tk) // 对 所 有 增 量 序列 
{ ShellInsert(L,dlta[k]); // 一 趟 增 量 为 dlta[k] 的 希 尔 插入 排序 
printf("dlta[ %d] =s%d, 第 %d 趟 排序 结果 ( 仅 输 出 关键 字 ): ",k,dlta[k],k+1); 
Print1(L); // 输出 顺序 表 工 的 关键 字 
} 
} 
间 define N 10 // 记录 数组 长 度 
间 define T 3 // 增 量 序列 数组 长 度 
void main() 
{ 
RedType d[N] = {{49 ,1) .138,2},165,3},197.4} .176.5},113,6},127.7} .149,8}， 
{55,9),{4,10)}; // 记录 数组 
SqList m; // 顺序 表 
int i,dt[T] = {5,3,1); // 增 量 序列 数组 (由 大 到 小 ,最 后 一 项 的 值 必 为 1) 
for(i=0;i<N;i++ ) // 将 数组 d 赋 给 顺序 表 m 
m.r[i+1]=d[i]; 
m. length = N; 
printf(" 希 尔 排序 前 :"); 
Print(m); // 输出 排序 前 的 顺序 表 m 
ShellSort(m,dt,T); // 按 增 量 序列 dt[0..7- 1] 对 顺序 表 m 作 希 尔 排序 
printf(" 希 尔 排序 后 :"); 
Print(m); // 输出 排序 后 的 顺序 表 nm 
} 


程序 运行 结果 (以 教科 书 中 图 10. 5 的 数据 为 例 ) : 


希 尔 排序 前 : (49,1)(38,2)(65,3)(97,4)(76,5)(13,6)(27,7)(49,8)(55,9)(4,10) 
dita[0] = 5, 第 1 趋 排 序 结 果 ( 仅 输出 关键 字 ): 13 27 49 55 4 49 38 65 97 76 
dita[1] = 3, 第 2 趟 排序 结果 ( 仅 输出 关键 字 ): 13 4 49 38 27 49 55 65 97 76 
dita[2] =1, 第 3 趟 排序 结果 ( 仅 输出 关键 字 ): 4 13 27 38 49 49 55 65 76 97 
希 尔 排序 后 : (4,10)(13,6)(27,7)(38,2)(49.8)(49.1)(55,9)(65,3)(76.5)(97,4) 


93 快速 排序 


数据 文件 f9-2. txt 的 内 容 如 下 : 


49 38 65 97 76 13 27 49 


// algo9-4. cpp 调用 起 泡 排序 的 程序 
间 include"c1.h" 
间 define N 20 // 数组 长 度 
void bubble sort(int al |,int n) 
{ // 将 a 中 个 整数 重新 排列 成 自 小 至 大 的 有 序 序列 (在 教科 书 第 16 页 ) 
int i,j,t; 
Status change; // 调整 的 标志 
for(i=n-1,change = TRUE;i>=1&&change;--i) // 由 后 到 前 调整 ,change = FALSE 时 终止 循环 
{ change = FALSE; // 本 次 循环 未 调整 的 标志 
for(j= 0;j 一 i;++j) // 从 第 1 个 到 倒数 第 2 个 
if(a[j]>a[j+1]) // 前 面 的 大 于 后 面 的 
{ t=a[ 订 ; // 前 后 交换 
a[j] =a[j+1]; 
a[j+1]=t; 
change = TRUE; // 设置 调整 的 标志 


} 
void Print2(int r[ |,int n) 
{ // 输出 数组 rt 的 前 nn 个 数 
int i; 
for(i=0;i<~n;i++) 
printf("%d",r[i]); 
printf("\n"); 
} 
void main () 
{ 
FILE * f; // 文件 指针 类 型 
int i=0,j,d[N]; 
f= fopen("f9-2.txt","r"); // 打开 数据 文件 f9-2. txt 
do 
{ j=fscanf(f,"%d",&gd[i++ ]); // 将 文件 f9-2.txt 中 的 整数 依次 赋 给 d[ 订 
}while(j!= EOF); // 未 到 文件 尾 
fclose(f); // 关闭 £ 所 指 的 文件 ,f 不 再 指向 f9-2. txt 文件 
i 一 ; // i 为 读 入 的 数据 个 数 
printf(" 排 序 前 : \n"); 
Print2(d,i); // 输出 数组 d 排序 前 的 前 二 个 数 
bubble_sort(d,i); // 对 数组 d 的 前 二 个 数 调用 起 泡 排序 法 
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printf(" 排 序 后 : \n"); 
Print2(d,i); // 输出 数组 d 排序 后 的 前 i 个 数 
} 


程序 运行 结果 (以 教科 书 中 图 10. 6 的 数据 为 例 ) : 


排序 前 : 
49 38 65 97 76 13 27 49 
排序 后 : 
13 27 38 49 49 65 76 97 


// bo9-2.cpp 快速 排序 的 函数 ,包括 算法 10.7 和 算法 10.8 
void QSort(SqList &L,int low,int high) 
{ // 对 顺序 表 工 中 的 子 序列 D.r[low. .high] 作 快速 排序 。 算 法 10.7 
int pivotloc; 
证 (low<<high) // 子 序列 长 度 大 于 1 
{ pivotloc = Partition(L,low,high); 
// 将 L.r[low. .highj] 按 关键 字 一 分 为 二 ,pivotloc 是 枢 轴 位 置 
9Sort(L,low,pivotloc- 1); // 对 关键 字 小 于 枢 轴 关键 字 的 低 子 表 递归 快速 排序 
QSort(L,pivotloc +1,high); // 对 关键 字 大 于 枢 轴 关键 字 的 高 子 表 递 归 快 速 排序 


} 
void QuickSort(SqList &L) 
{ // 对 顺序 表 工 作 快 速 排 序 。 算 法 10.8 
QSort(L,1,L. length) ; // 对 整个 顺序 表 工 作 快速 排序 
} 


// func9-3.cpp 算法 10.6(a) 
int Partition(SqList &L, int low,int high) 
{ // 交换 顺序 表 工 中 子 表 L. r[1low. .high] 的 记录 ,使 枢 轴 记录 到 位 ， 
// 并 返回 其 所 在 位 置 ,此 时 在 它 之 前 (后 ) 的 记录 均 不 大 (小 ) 于 它 。 算 法 10.6(a) 
RedType t; 
KeyType pivotkey; // 枢 轴 关键 字 
pivotkey= L.r[lom].key; // 用 子 表 的 第 1 个 记录 作 初 始 枢 轴 记 录 
while(low<<high) // 未 分 类 的 区 间 大 于 0 
{ // 从 表 的 两 端 交替 地 向 中 间 扫 描 
while(low<high&&L.r[high].key>= pivotkey) // 高 端 记录 的 关键 字 大 于 枢 轴 关键 字 
一 -high; // 高 端 向 低 移 ,继续 比较 
t=L.r[Llow]; // 将 比 枢 轴 关 键 字 小 的 记录 交换 到 低 端 , 枢 轴 到 高 端 
L.r[low]=L.r[high]; 
L.r[high]=t; 
while(low< 二 high&&gL.r[low]. key 二 = pivotkey) // 低 端 记录 的 关键 字 小 于 枢 轴 关键 字 
+tlow; // 低 端 向 高 移 , 继 续 比 较 
t= 工 .rt[low]; // 将 比 枢 轴 关键 字 大 的 记录 交换 到 高 端 , 枢 轴 到 低 端 
L.r[low]=L.r[high]; 
L.r[high] =t; 


return low; // 返回 枢 轴 所 在 位 置 
} 


// func9-4.cpp 算法 10.6(b) (算法 10.6(a) 的 改进 ) 
int Partition(SqList &L,int low,int high) 
{ // 交换 顺序 表 工 中 子 表 r[low. .high] 的 记录 , 枢 轴 记录 到 位 ,并 返回 其 
// 所 在 位 置 ,此 时 在 它 之 前 (后 ) 的 记录 均 不 大 (小 ) 于 它 。 算 法 10.6(b) 
KeyType pivotkey; // 枢 轴 关键 字 
pivotkey=L.r[low].key; // 用 子 表 的 第 1 个 记录 作 初 始 枢 轴 记录 
L.r[0] =L.r[low; // 将 枢 轴 记录 保存 到 [0] ,改进 处 
while(low 一 high) // 未 分 类 的 区 间 大 于 0 
{ // 从 表 的 两 端 交替 地 向 中 间 扫 描 
while(low<high&&L.r[high].key> = pivotkey) // 高 端 记 录 的 关键 字 大 于 枢 轴 关键 字 
一 high; // 高 端 向 低 移 ,继续 比较 
L.r[low] =L.r[high]; // 将 比 枢 轴 关 键 字 小 的 记录 移 到 低 端 , 枢 轴 在 [0] 不 动 ,改进 处 
while(low<high&&L.r[low].key 一 = pivotkey) // 低 端 记录 的 关键 字 小 于 枢 轴 关键 字 
+How; // 低 端 向 高 移 , 继 续 比 较 
L.r[high] = L.r[Llow]; // 将 比 枢 轴 关键 字 大 的 记录 移 到 高 端 , 枢 轴 在 [0j 不 动 , 改 进 处 
} 
L.r[low] =L.r[o]j; // 枢 轴 记录 到 位 ,改进 处 
return low; // 返回 枢 轴 位 置 


// algo9-5.cpp 调用 算法 10.7 .算法 10.8、 算 法 10.6(a) 和 算法 10.6(b) 的 程序 
间 include 二 stdio.h> 
typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 
typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 
间 include"c9-1.h" // 记录 的 数据 类 型 
间 include"c9-2.h" // 顺序 表 类 型 的 存储 结构 
间 include"func9-1.cpp" // 配套 的 输入 输出 也 数 
间 include"func9-3.cpp" // 算法 10.6(a) ,函数 Partition(), 此 2 行 任 取 1 行 ,运行 结果 相同 
// 提 include"func9-4.cpp" // 算法 10.6(b) ,函数 Partition() 
# include" bo9-2.cpp"// 快速 排序 的 函数 ,包括 算法 10.7 和 算法 10.8 
void main () 
{ 
FILE xf; // 文件 指针 类 型 
SqList m; // 顺序 表 变 量 
int i; 
f= fopen("f9-1.txt","r"); // 打开 数据 文件 f9-1. txt 
fscanf(f,"%d",&m.1length); // 由 数据 文件 输入 数据 元 素 个 数 给 m. length 
for(i=1;i<<=m.length;i++ ) // 给 m.r 赋值 
InputFromFile(f,m.r[i]); // 由 数据 文件 输入 数据 元 素 的 值 并 赋 给 m. [i 
fclose(f); // 关闭 数据 文件 
printf(" 排 序 前 : \n"); 
Print(m); // 输出 排序 前 的 顺序 表 m 
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QuickSort(m); // 对 m 调 用 快速 排序 法 
printf(" 排 序 后 : \n"); 
Print(m); // 输出 排序 后 的 顺序 表 nm 

} 


程序 运行 结果 (以 教科 书 中 图 10. 7 的 数据 为 例 ) : 


排序 前 : 
(49,1)(38,2)(65,3)(97,4)(76,5)(13,6)(27,7)(49.8) 
排序 后 : 
(13,6)(27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 


94 选择 排序 


// bo9-3.cpp 选择 排序 算法 ,包括 算法 10.9、 算 法 10.10 和 算法 10.11 
int SelectMinKey(SqList L,int i) 
{ // 返回 在 L.r[i..L.1length] 中 key 最 小 的 记录 的 序号 
int j,k=i; // 初始 设 [ 世 的 关键 字 为 最 小 , 存 守 于 k 
KeyType min = L.r[i].key; // [i] 的 关键 字 存 于 min 
for(j = i+1;j 一 = L.length;j++ ) // 依次 与 其 他 记录 比较 
if(L.r[j].key 二 min) // 找到 更 小 的 关键 字 
{ k=j; // 分 别 将 更 小 的 赋 给 k 和 min 
min=L.r[j].key; 
} 
return k; // 返回 序号 
} 
void SelectSort( SqList &L) 
{ // 对 顺序 表 工 作 简 单 选择 排序 。 算 法 10.9 
int i,j; 
RedType t; 
for(i=1;i<L.length;+ti) // 选择 第 i 小 的 记录 ,并 交换 到 位 
{ j= SelectMinKey(L,i); // 在 EL.r[i..L.length] 中 选择 key 最 小 的 记录 
if(i!l=j) 
{ t= 工 .r[i]; // 与 第 i 个 记录 交换 ,使 得 第 i 小 的 存 于 [ 订 
Ei = .2 
Lr[j]=t; 


} 
void TreeSort(SqList&L) 
{ // 树 形 选 择 排序 
int i,n; 
RedType *t; 
t= (RedType * )malloc((2*L.length- 1) x sizeof(RedType)); // 二 叉 树 采用 顺序 存储 结构 
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for(i=1;i<=L.length;i++ ) // 将 EL.r 赋 给 叶子 结 点 (从 上 到 下 ,从 左 到 右 ) 
t[L. length— 2+i]=L.r[i]; 
for(i=L.length-2;i>=0;i 一 ) // 由 后 向 前 给 非 叶子 结 点 赋值 
t[i]=t[2x*i+1].key<=t[2x*i+2].key?t[2*i+1]:t[2x*i+2]; 
// 非 叶 子 结 点 的 值 为 其 左右 孩子 中 关键 字 小 的 
for(i= 0;i<L. length;i++ ) 
{ 工 .rf[i+1]=t[0]; // 将 当前 最 小 值 赋 给 L. [i] 
n= 0; // 根 结 点 序号 
do // 沿 树 根 按 层 找 结 点 t[0j 在 叶子 中 的 序号 n 
{ n=t[2x*xn+1].key==t[n].key?2*n+1:2*n+2; 
}while(n 一 L. length— 1); 
t[n].key= INT_MAX; // 将 此 叶子 结 点 的 关键 字 赋 无 穷 大 
while(n) // n 不 是 根 结 点 
{n=(n+1l)/2-1; // 序号 为 n 的 结 点 的 双亲 结 点 序号 
t[n] =t[2x*xn+1].key<=t[2*n+2].key?(t[2x*n+1]):(t[2*n+2]); 
// 非 叶 子 结 点 的 值 为 其 左右 孩子 中 关键 字 小 的 
} 
} 
free(t); // 释放 t 上 所 指 的 存储 空间 

} 

void HeapAdjust(HeapType &H, int s,int m) 

{ // 已 知 HrLs. .mj 中 记录 的 关键 字 除 B.r[s].key 之 外 均 满足 大 顶 堆 的 定义 ,本 函数 
// 调整 H.r[s] 的 关键 字 , 使 H.rLs. .mj 中 记录 的 关键 字 均 满足 大 顶 堆 的 定义 。 算 法 10.10 
int j; 

H.r[0]=H.r[s]; // 利用 H 的 空闲 结 点 存储 待 调整 记录 ,修改 
for(j=2*s;j<<=m;j* =2) // j 指 向 待 调整 记录 [s] 的 左 孩 子 , 沿 key 较 大 的 孩子 结 点 向 下 筛选 
{ if(j 二 m&&LT(H.r[j].key,H.r[j+1].key)) // 左 孩 子 的 关键 字 一 右 孩 子 的 关键 字 
++j; // j 指向 [sj 的 右 孩 子 
if£(1LT(H. r[0].key,H.r[j].key)) // [sj] 的 关键 字 不 小 于 [让] 的 关键 字 , 修 改 
break; // 不 必 再 调整 ,跳出 for 循环 
H.r[s] = H.r[j]; // 否则 ,[j] 为 大 顶 ,插入 [sj] 
s=j; // [sj 的 位 置 向 下 移 到 [jj]( 原 左 或 右 孩 子 处 ) 
} 
H.r[s]=H.r[0]; // 将 待 调整 的 记录 插入 [sj, 修 改 
} 
void HeapSort (HeapType &H) 
{ // 对 顺序 表 HE 进行 堆 排序 。 算 法 10.11 
int i; 
for(i = H. length/2;i>0; 一 i) // 从 最 后 一 个 非 叶子 结 点 到 第 1 个 结 点 
HeapAdjust(H,i,H. length); // 调整 H.r[ 订 ,使 H.r[i..H.length] 成 为 大 顶 堆 
for(i=H.length;i>1;--i) 
{ H.r[0] =H.r[1]; // 将 堆 顶 记录 [1] 和 未 完全 排序 的 H.r[1. . 订 中 的 最 后 一 个 记录 [i 交换 
H.r[1]=H.r[i]; 
H.r[i]=H.r[0]; 
Heapadjust(H,1,.i-1); // 调整 H.r[1], 使 H.r[1..i-1] 重 新 成 为 大 顶 堆 
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// algo9-6.cpp 调用 算法 10.9、 算 法 10.10 和 算法 10.11 的 程序 
间 include"cl.h" 
间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 
typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 
typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 
间 include"c9-1.h" // 记录 的 数据 类 型 
间 include"c9-2.h" // 顺序 表 类 型 的 存储 结构 
间 include"func9-1.cpp"” // 配套 的 输入 输出 函数 
typedef SqList HeapType; // 定义 堆 为 顺序 表 存 储 结构 。 在 教科 书 第 281 页 
间 include"bo9-3.cpp”// 选择 排序 的 函数 ,包括 算法 10.9、 算 法 10.10 和 算法 10.11 
void main( ) 
{ 
FILE xf; // 文件 指针 类 型 
SqList ml,m2,m3; // 3 个 顺序 表 变 量 
int i; 
f= fopen("f9-1.txt","r"); // 打开 数据 文件 f9-1.txt 
fscanf(f,"%d",&ml.length); // 由 数据 文件 输入 数据 元 素 个 数 给 m1. length 
for(i= 1;i 一 = ml. length;i++ ) // 给 ml.r 赋值 
InputFromFile(f,ml.r[i]); // 由 数据 文件 输入 数据 元 素 的 值 并 赋 给 m1. [i] 
fclose(f); // 关闭 数据 文件 
m2 = m3= ml; // 复制 顺序 表 , 使 m2、m3 与 ml 相同 
printf(" 排 序 前 : \n"); 
Print(m1); // 输出 排序 前 的 顺序 表 
SelectSort(m1); // 对 ml 调用 简单 选择 排序 法 
printf(" 简 单 选择 排序 后 : \n"); 
Print(m1); // 输出 排序 后 的 ml 
TreeSort(m2); // 对 m2 调用 树 形 选择 排序 法 
printf(" 树 形 选择 排序 后 : \n"); 
Print(m2); // 输出 排序 后 的 m2 
HeapSort(m3); // 对 m3 调用 堆 排 序 法 
printf(" 堆 排序 后 : \n"); 
Print(m3); // 输出 排序 后 的 m3 
} 


程序 运行 结果 : 


排序 前 : 
(49,1)(38,2)(65,3)(97,4)(76,5)(13,6)(27.,7)(49,8) 
简单 选择 排序 后 : 

(13,6) (27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 
树 形 选择 排序 后 :( 见 图 9-9) 
(13,6)(27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 
堆 排 序 后 :( 见 图 9-10) 
(13,6)(27,7)(38,2)(49,1)(49,8)(65,3)(76,5)(97,4) 
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(a) 将 m2.r 赋 给 t 的 叶子 结 点 


13|6 |][0] 
38|2 |[ 
13|6 ID] 
38|2 |[3] 
65|3 |[4] 
13|6 |[5] 
27| 7 [6] 
491 1 [07] 
Bs| 2 [81 
65| 3 |[9] 
97|4 |[10] 
76|5 |[11] 
13| 6 |02] 
|27|7103] 
49| 8 |[14] 
(b) 给 的 非 叶子 结 点 赋值 ,t[0] 已 排序 , 赋 给 m2.r[0] 
t 
27| 7 J[0] 
38| 2 [1] 
27| 7 |[2] 
38| 2 |[3] 
65| 3 [4] 
76| 5 |[5] 
|27| 7 [6] 
49| 1 4[7] 
38| 2 |[8] 
65| 3 |[9] 
97| 4 [10] 
76| 5 [11] 
of61[12] 
27| 7 [13] 
49| 8 |[14] 


(0) 将 叶子 结 点 中 已 给 m2. 赋 过 值 的 关键 字 改 为 ~, 并 沿 根 结 点 方向 修改 非 叶子 结 点 的 值 
图 9-9 树 形 选 择 排序 
树 形 选 择 排序 采用 辅助 数组 t 作为 二 又 树 的 顺序 存储 结构 ,将 待 排序 的 数据 存 于 叶子 


结 点 去 比较 。 它 的 优点 是 减少 了 比较 次 数 ; 缺点 是 辅助 数组 t 所 占 空间 较 大 ,接近 数据 个 
数 的 2 倍 。 
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m3r[] m3:[1] 


pss = 过 Sexyam 


昌 此 序号 最 大 的 非 叶子 结 
点 开始 ,向 小 序号 方向 调整 


(a) 初 态 ,97 和 65 不 需要 调整 , 将 要 调整 38 (b) 调整 38 后 的 结果 , 将 要 调整 49 
m3.r[1] War 一 m3.r[1] 


(0) 调整 49 后 成 为 大 顶 堆 , 将 交换 97 和 38 (d) 大 顶 堆 的 项 元 素 沉 底 ,并 脱离 二 叉 树 (不 再 进入 排序 )， 
此 时 只 有 堆 项 元 素 38 不 满足 堆 的 定义 
m3 m3:r[1] 


@D 


m3.r[1] 


EA 

这 
EEC HE 

A 

Dy 

2 


9714| | 
8 
(e) 调整 38 后 成 为 新 的 大 项 堆 (1) 堆 排序 的 最 终结 果 


图 9-10 大 项 堆 ( 升 序 ) 排 序 示 例 
注 : 双向 箭头 表示 将 要 进行 的 调整 


堆 排 序 是 树 形 选 择 排 序 的 改进 , 它 不 需要 辅助 数组 。 直 接 将 顺序 存储 的 数据 看 作 一 棵 
完全 二 叉 树 上 的 结 点 。 这 与 c6-1. h 定义 的 二 叉 树 的 顺序 存储 结构 有 相似 之 处 ,但 堆 排 序 的 
根 结 点 存 于 [1] 中 (0J 作 临时 存储 之 用 )。 所 以 ,序号 为 j 的 结 点 ,其 双亲 序号 为 | j/2 」; 其 
左右 孩子 序号 分 别 为 3 和 2j 十 1。 堆 的 定义 是 (以 大 顶 堆 ( 升 序 ) 为 例 ): 任何 一 个 非 叶子 结 
点 的 关键 字 值 都 不 小 于 它 左右 孩子 结 点 的 关键 字 值 。 所 以 ,对 于 一 个 满足 堆 定 义 的 顺序 存 
储 结构 ,虽然 它 的 所 有 元 素 的 排列 并 不 是 完全 有 序 的 ,但 堆 顶 元 素 [1] 必 定 是 值 最 大 的 元 素 。 

堆 排 序 分 3 步 :首先 ,将 完全 无 序 的 二 叉 树 建 为 堆 ,其 步骤 是 ,对 于 所 有 非 叶 子 结 点 ,由 
序号 最 大 的 结 点 起 ,由 下 至 上 地 将 以 该 结 点 为 根 的 子 树 调整 为 堆 , 如 图 9-10(a) 一 (c) 所 示 。 
然后 ,将 堆 项 元 素 和 最 后 一 个 元 素 [i 交换 , 则 最 后 一 个 元 素 [让 是 排 好 序 的 ,将 此 元 素 从 堆 
中 除去 , 即 堆 的 规模 一 1。 在 尚未 排 好 序 的 元 素 ([1j 一 [i 一 1]) 中 , 除 刚 交换 的 堆 顶 元 素 外 ， 
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都 符合 堆 的 定义 ,如 图 9-10(d) 所 示 。 此 时 ,去 掉 最 后 一 个 结 点 的 二 叉 树 ,其 左右 子 树 都 已 
建 堆 , 只 须 调整 新 的 堆 顶 元 素 ,使 新 的 二 又 树 满足 堆 的 定义 ,如 图 9-10(e) 所 示 。 最 后 ,所 有 
元 素 都 已 排序 ,并 脱离 堆 , 堆 为 空 ,如 图 9-10(f) 所 示 。 堆 排序 的 优点 是 : 堆 顶 元 素 顶 多 需要 
与 其 左右 孩子 之 一 (3 元 素 中 的 最 大 值 ) 作 交换 。 同 时 如 果 堆 项 元 素 被 交换 , 则 只 有 交换 的 影 
响 波及 的 小 堆 可 能 需要 再 作 交 换 , 且 所 有 叶子 结 点 (具有 n 个 结 点 的 完全 二 叉 树 只 有 | n/2 | 个 
非 叶 子 结 点 ) 没 有 孩子 ,不 用 交换 。 这 样 就 可 用 较 少 的 比较 .调整 步骤 ,达到 排序 目的 。 


95 归并 排序 


数据 文件 f9-3. txt 的 内 容 如 下 : 


要 

49 1 
38 2 
65 3 
97 4 
76 5 
13 6 
27 7 


// alg9-7.cpp 归并 排序 ,包括 算法 10.12 一 算法 10.14 
间 include"c1.h" 
间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 
typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 
typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 
并 include"c9-1.h"”// 记录 的 数据 类 型 
间 include"c9-2.h"”// 顺序 表 类 型 的 存储 结构 
间 include"func9-1.cpp" // 配套 的 输入 输出 函数 
void Merge(RedType SR[ |,RedType TR[ ] ,int i,int m,int n) 
{ // 将 有 序 的 SRLi. .四 和 SRLm+ 1. .ao 归并 为 有 序 的 TR[i..n]。 算 法 10.12 
int j,k,p; 
for(j=m+1,k= iii<<=m&gj<= n;+tk) // 将 SR 中 记录 由 小 到 大 地 并 入 TR 
if LO(SR[i]. key,SR[j]. key) 
TR[k] = SRLi++ ]; 
else 
TR[k] = SR[j++ ]; 
if(i<=m) 
for(p=0;p—==m- isp++ ) 
TR[k+p]= SR[i+p]; // 将 剩余 的 SR[i. .mj 复制 到 TR 
if(j<=n) 
for(p=0;p—==n- j;p++) 
TR[k+p]= SR[j+pj]; // 将 剩余 的 SR[j. .nj 复制 到 TR 
} 
void MSort (RedType SR[ |,RedType TR1[ |.int s, int t) 
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{ // 将 SR[s..t] 归 并 排序 为 TR1[s. .t]。 算 法 10.13 
int m; 
RedType TR2[MAX SIZE+ 1]; 
if(s ==t) // 只 有 1 个 元 素 待 归 并 
TR1[s] = SRLs]; // 直接 赋值 
else // 有 多 个 元 素 待 归并 
{ m= (s+t)/2; // 将 SR[s. .tj 平分 为 SR[s..m] 和 SR[m+1..t] 
MSort(SR,TR2,s,m); // 递归 地 将 SR[s. .四 归并 为 有 序 的 TR2[s. .m] 
MSort(SR,TR2,m+ 1,t); // 递归 地 将 SR[m+1..t] 归 并 为 有 序 的 TR2[m+1..t] 
Merge(TR2,TR1,s,m,t); // 将 TR2[s. .mj] 和 TR2[m+1..t] 归 并 到 TR1[s..t] 
} 
} 
void MergeSort (SqList &L) 
{ // 对 顺序 表 工 作 归 并 排序 。 算 法 10.14 
MSort(L.r,L.r,1,L. length); 
// 将 顺序 表 2.r[1..L. length] 归 并 排序 为 有 序 的 顺序 表 .rz[L1..D. length] 
} 
void main() 
{ 
FILE xf; // 文件 指针 类 型 
SqList m; // 顺序 表 变 量 
int i; 
f = fopen("f9-3.txt","r"); // 打开 数据 文件 £9-3. txt 
fscanf(f,"%d",&m. length); // 由 数据 文件 输入 数据 元 素 个 数 给 m. length 
for(i=1;i 二 =m. length;i++ ) // 给 m.r 赋值 
InputFromFile(f,m.r[i]); // 由 数据 文件 输入 数据 元 素 的 值 并 赋 给 m1. [i] 
fclose(f); // 关闭 数据 文件 
printf(" 排 序 前 : \n"); 
Print(m); // 输出 排序 前 的 顺序 表 m 
MergeSort(m); // 对 m 调 用 归并 排序 法 
printf(" 排 序 后 : \n"); 
Print(m); // 输出 排序 后 的 顺序 表 nm 
} 


程序 运行 结果 (以 教科 书 中 图 10. 13 的 数据 为 例 ): 


排序 前 : 
(49,1)(38,2)(65,3)(97,4)(76,5)(13,6)(27.7) 
排序 后 : 
(13,6)(27,7)(38,2)(49,1)(65.3)(76.5)(97.4) 


96 基数 排序 


// c9-4.h 基数 排序 的 数据 类 型 。 在 教科 书 第 286 页 
间 define MAX_NUM_OF_KEY 8 // 关键 字 项 数 的 最 大 值 


提 define RADIX 10 // 关键 字 基 数 . 此 时 是 十 进 制 整数 的 基数 


提 define MAX SPACE 100 SLCell 

struct SLCell // 静态 链表 的 结 点 类 型 ( 见 图 9-11) MAX NUM OF KEY-1 

{ KeysType keys[MAX_NUM OF KEY]; // 关键 字 [ol [ 
InfoType otheritems; // 其 他 数据 项 | ! .| | otheritems | next 
int next; keys 


上 

struct SLList // 静态 链表 类 型 ( 见 图 9-12) 

{ SLCell r[MAX_SPACE]; // 静态 链表 的 可 利用 空间 ,r[0] 为 头 结 点 
int keynum; // 记录 的 当前 关键 字 个 数 
int recnum; // 静态 链表 的 当前 长 度 

}s 

typedef int ArrType[ RADIX]; // 指针 数组 类 型 


数据 文件 {9-4. txt 的 内 容 如 下 : 


10 
278 1 
109 2 
063 3 
930 4 
589 5 
184 6 
505 7 
269 8 
008 9 图 9-12 静态 链表 存储 结构 
083 10 


图 9-11 静态 链表 的 结 点 类 型 


SLList 
| otheritems | next | [0] 


[1] 


[MAX_SPACE —1] 


keynum 


recnum 


// alg9-8. cpp 链 式 基数 排序 .包括 算法 10.15 一 算法 10.17 
间 include"ci.h" 
typedef char KeysType; // 定义 关键 字 类 型 为 字符 串 型 
typedef int InfoType; // 定义 其 他 数据 项 为 整 型 
# include"c9-4.h" // 基数 排序 的 数据 类 型 
typedef SLList SqList; // 定义 SqList 为 SLList 类 型 ,以 便利 用 func9-2.cpp 中 的 函数 
间 define length recnum // 定义 length 为 recnum 类 型 ,以 便利 用 func9-2. cpp 中 的 函数 
间 include"func9-2.cpp" // 算法 10.18 
void MadeListFromFile(SLList &L,FILE#%f£) 
{ // 通过 文件 上 建立 顺序 表 工 

int i; 

fscanf(f,"%d",&L. recnum); // 由 数据 文件 输入 表 长 给 L. recnum 

for(i= 1;i 一 =L.recnum;i++ ) // 依次 输入 结 点 的 值 ( 除 next 域 ) 

fscanf(f,"%s%d" ,gL.r[il].keys,g&L.r[il].otheritems); 

L.keynum = strlen(L.r[1].keys); // 将 关键 字 的 长 度 赋 给 L. keynum( 设 关键 字 等 长 ) 
} 
int ord(char c) 
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{ // 返回 关键 字 c 的 序号 
returnc—'0'; 

} 

void Distribute(SLCell r[ |,int i,ArrType f.ArrType e) 

{ // 静态 链表 工 的 上 = 域 中 记录 已 按 (keys[i- 1],…,keys[0]) 有 序 。 本 算法 按 第 i 个 关键 字 
// keys[i](keys[0] 是 最 低位 关键 字 ) 建 立 RADIX 个 子 表 , 使 同一 子 表 中 记录 的 keys[i] 相 同 。 
// f[0. .RADIX 1] 和 e[0..RADIX-1] 分 别 指向 各 子 表 中 第 一 个 和 最 后 一 个 记录 。 算 法 10.15 
int j,p; 
for(j = 0;j<RADIX;++j) 

f[j]=0; // 各 子 表 初 始 化 为 空 表 
for(p=r[0].next;p;p=r[p].next) // p 按 链 式 结构 依次 指向 静态 链表 的 记录 
{ j= ord(r[p].keys[i]); // 当前 记录 的 第 i 位 关键 字 的 序号 ,以 下 将 当前 记录 按 序号 插入 子 表 
iE(1f[j]) // 子 表 [ 实 空 
Ef[j 说 = p; // 表 头 指向 当前 记录 
else // 子 表 [j] 不 空 
r[e[j]].next = p; // 修改 原子 表 [jj] 的 表 尾 记录 的 next 域 指向 当前 记录 
e[j] =p; // 设置 表 尾 指针 指向 p 所 指 的 新 表 尾 记录 
} 
printf("\nf[j]="); // 以 下 输出 表 头 指针 f[] 和 表 尾 指针 e[] ,新 增 
for(j = 0;j<—RADIX;++j) 
printf("%3d" ,f[j]); 
printf("\ne[j] = "); 
for(j = 0;j<RADIX;++j) 
i£(f[j]) 
printf("%3d",e[j]); 
else 
printf("%3d" ,0); 
printf("\n"); 
} 
int succ(int i) 
{ // 求 后 继 函 数 
return ++i; 
} 
void Collect(SLCell r[ |.ArrType f,RrrType e) 
{ // 本 算法 按 keys[ 订 自 小 至 大 地 将 碟 0. .RaDIX- 1] 所 指 各 子 表 依次 链接 成 一 个 链表 ， 

// e[L0..RRADIX- 1 为 各 子 表 的 尾 指 针 。 算 法 10. 16 

int j,t; 
for(j=0;!f[j];j= succ(j)); // 找 第 1 个 非 空子 表 [j], succ 为 求 后 继 函 数 
[0].next = f[j]; // rL0].next 指向 第 1 个 非 空 子 表 [的 第 1 个 元 素 
t= e[j]; // 指向 第 1 个 非 空 子 表 [让 的 表 尾 元 素 
while(j 一 RARDIX- 1) // 未 到 最 后 一 位 关键 字 
{ for(j = succ(j);j 一 RDIX- 1&&!f[j];j= succ(j)); // 找 下 一 个 非 空子 表 
i£(f[j]) // 子 表 不 空 
{ r[tj.next = f[j]; // 链接 两 个 非 空子 表 


t=e[j]; //t 指 向 新 的 表 尾 元 素 


} 
r[t].next = 0; // 表 尾 
} 
void Print2(SLList L) 
{ // 按 数组 序号 输出 静态 链表 
int i=0; 
printf("keynum =%d recnum =$%d i=$%d next =%d\n" ,L. keynum,L. recnum,i, 
L.r[il].next); 
for(i=1;i<=L.recnum;i++ ) 
printf("i=%d keys =%s otheritems =%d next =%d\n" ,i,L.r[i].keys, 
L.r[il].otheritems,L.r[i].next); 
} 
void PrintLL(SLList L) 
{ // 按 链表 顺序 输出 静态 链表 工 
int i=L.r[0].next; 
while(i) 
{ printf("%s",L.r[i].keys); 


i=L.r[il].next; 


} 
void RadixSort(SLList &L) 
{ // 工 是 采用 静态 链表 表示 的 顺序 表 。 对 工作 基数 排序 ,使 得 工 成 为 按 关键 字 
// 自 小 到 大 的 有 序 静 态 链表 ,L.r[0] 为 头 结 点 。 算 法 10.17 
int 1,j=13 
ArrType f.e; 
for(i=0;i<L.recnum;++i) // 将 工 改造 为 静态 链表 
L.r[i].next=i+1; 
L.r[L. recnum|. next = 0; 
for(i=L.keynum 一 1;i 祈 = 0; 玉 ,+j) // 按 最 低位 优先 依次 对 各 关键 字 进 行 分 配 和 收集 ,修改 
{ Distribute(L.r,i,f,e); // 第 二 趟 分 配 
printf(" 第 %d 趟 分 配 后 ; \n",j); 
Print2(L); // 按 序号 输出 排序 前 的 静态 链表 nm 
Collect(L.r,f,e); // 第 二 趟 收集 
printf(" 第 %d 趟 收集 后 : \n" ,j); 
Print2(L); // 按 序号 输出 静态 链表 工 
PrintLL(L); // 按 链 表 顺 序 输出 静态 链表 工 


} 

void main() 

{ 
FILE xf; // 文件 指针 类 型 
SLList m; // 静态 链表 变量 
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int #* adr; 

f= fopen("f9-4.txt","r"); // 打开 数据 文件 f9-4.txt 
MadeListFromFile(m,f); // 通过 文件 建立 静态 链表 m 
fclose(f); // 关闭 数据 文件 

printf(" 排 序 前 (next 域 还 未 赋值 ) : \n"); 

Print2(m); // 按 序 号 输出 排序 前 的 静态 链表 m 

RadixSort(m); // 对 m 调 用 基数 排序 法 ,使 得 nm 成 为 有 序 静 态 链 表 


adr = (int* )malloc((m. recnum + 1) * sizeof(int)); // 动态 生成 


adr 数组 


Sort(m,adr); // 求 得 adr[1..m. length],adr[i] 为 静态 链表 nm 的 第 i 个 最 小 记录 的 序号 


Rearrange(m,adr); // 按 adr[ ] 重 排 m.r, 使 其 成 为 有 序 的 顺序 表 
free(adr); // 释放 adr 所 指 的 存储 空间 
printf("\n 重 排 记录 后 (next 域 不 起 作用 ) : \n"); 
Print2(m) ; // 按 序 号 输出 重新 排序 后 的 静态 链表 m 
} 


程序 运行 结果 (以 教科 书 中 图 10. 14 的 数据 为 例 ): 


排序 前 (next 域 还 未 赋值 ):( 见 图 9-13) 
keynum = 3 recnum= 10 i= 0 next = 20480 
i=1 keys = 278 otheritems = 1 next = 25956 
i=2 keys= 109 otheritems = 2 next = 28532 
i=3 keys = 063 otheritems = 3 next = 25455 
i=4 keys= 930 otheritems = 4 next = 26144 
i=5 keys = 589 otheritems = 5 next = 8293 
i=6 keys= 184 otheritems = 6 next = 28448 
i=7 keys = 505 otheritems = 7 next = 26992 
i=8 keys = 269 otheritems = 8 next = 25458 
i=9 keys = 008 otheritems = 9 next = 8303 
i=10 keys = 083 otheritems = 10 next = 25960 


f[j]=400 3670012 
e[j]=40010670098 

第 1 趟 分 配 后 :〈 见 图 9-14) 

keynum = 3 recnum= 10 i= 0 next=1 
i=1 keys = 278 otheritems = 1 next= 9 
i=2 keys = 109 otheritems = 2 next= 5 
i=3 keys = 063 otheritems = 3 next = 10 
i=4 keys = 930 otheritems = 4 next= 5 
i=5 keys = 589 otheritems = 5 next=8 
i=6 keys = 184 otheritems = 6 next=7 
i=7 keys = 505 otheritems = 7 next= 8 
i=8 keys = 269 otheritems = 8 next =9 
i=9 keys = 008 otheritems = 9 next= 10 
i=10 keys = 083 otheritems = 10 next =0 


[0] 
278; 1 [1] 
109; 2 [多 
063; 3 [3] 
930; 4 [4] 
589; 5 [5] 
184: 6 [6] 
505; 7 [7] 
269: 8 [8] 
008: 9 [9] 
083; 10 [10] 

: [99] 
3 
10 
图 9-13 ”排序 前 

m 

| 1 | [0] 
278; 1| 9| [1] 
109; 2| 5| [2] 
063; 3|10| [3] 
930: 4| 5| [4] 
589: 5| 8| [5] 
184: 6| 7| [6] 
505: 7| 8| [7] 
269: 8| 9| [8] 
008: 9|10| [9] 
083: 10 | 0| [10] 

: [99] 
3 
10 


9-14 第 1 趟 分 配 后 


第 1 趟 收集 后 : ( 见 图 9-15) 
keynum = 3 recnum= 10 i=0 next=4 
i=1 keys = 278 otheritems = 1 next =9 
i=2 keys = 109 otheritems = 2 next = 5 
i=3 keys = 063 otheritems = 3 next= 10 
i= 4 keys = 930 otheritems = 4 next = 3 
5 keys = 589 otheritems = 5 next = 8 
= 6 keys = 184 otheritems = 6 next =7 


= 7 keys = 505 otheritems = 7 next =1 
8 keys = 269 otheritems = 8 next =0 
i=9 keys = 008 otheritems = 9 next =2 


i=10 keys = 083 otheritems = 10 next= 6 


930 063 083 184 505 278 008 109 589 269 
f[j]=70040031100 
e[j]=20040081 50 

第 2 趟 分 配 后 :( 见 图 9-16) 

keynum= 3 recnum = 10 i=0 next= 4 
i=1 keys = 278 otheritems = 1 next=9 
i = 2 keys = 109 otheritems = 2 next=5 
3 keys = 063 otheritems = 3 next=8 
4 keys = 930 otheritems = 4 next =3 
= 5 keys = 589 otheritems = 5 next=8 
= 6 keys = 184 otheritems = 6 next=5 


i=7 keys = 505 otheritems = 7 next =9 
i=8 keys = 269 otheritems = 8 next =0 
i=9 keys = 008 otheritems = 9 next = 2 


1 = 10 keys = 083 otheritems = 10 next =6 


第 2 趟 收集 后 :( 见 图 9-17) 

keynum = 3 recnum = 10 i=0 next =7 
i=1 keys = 278 otheritems = 1 next= 10 
i=2 keys = 109 otheritems = 2 next = 4 
i = 3 keys = 063 otheritems = 3 next = 8 


4 keys = 930 otheritems = 4 next =3 
5 keys = 589 otheritems = 5 next=0 
= 6 keys = 184 otheritems = 6 next =5 
= 7 keys = 505 otheritems = 7 next =9 
i=8 keys = 269 otheritems = 8 next = 1 
i=9 keys = 008 otheritems = 9 next= 2 


i=10 keys = 083 otheritems = 10 next= 6 


505 008 109 930 063 269 278 083 184 589 
f[j]= 9280070004 
e[j]= 10610050004 


已 


oulolcialwlwlolalon 
on 
nl 


10 
图 9-15 第 1 趟 收集 后 


m 
4| [0] 
278: 1| 9| [1] 
109: 2| 5| [2] 
063: 3| 8| [3] 
930: 4| 3| [4] 
589: 5| 8| [5] 
184: 6| 5| [6] 
505; 7| 9| [7] 
269: 8| 0| [8] 
008: 9| 2| [9] 
083: 10 | 6| [10] 
: 99] 
3 
10 


m 
: 7] [o] 
278: 10| [1] 
109: 4| [2] 
063: 8| [3] 
930: 3 | [4] 
589 : 0| [5] 
184: 6| 5| [6] 
505 9 | [7] 
269 : 1| [8] 
008 2 | £9] 
083: 10 | 6 | [10] 
99] 
1 
10 


9-17 第 2 趟 收集 后 
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第 3 趟 分 配 后 : ( 见 图 9-18) 
keynum = 3 recnum= 10 i=0 next=7 


i = 1 keys = 278 otheritems = 1 next= 10 


= 2 keys = 109 otheritems = 2 next = 6 


3 keys = 063 otheritems = 3 next= 10 
i=4 keys= 930 otheritems =4 next =3 
i=5 keys = 589 otheritems =5 next =0 
i=6 keys= 184 otheritems =6 next=5 
i=7 keys= 505 otheritems = 7 next=5 
i=8 keys = 269 otheritems = 8 next =1 
i=9 keys = 008 otheritems = 9 next =3 
i=10 keys = 083 otheritems = 10 next= 6 
第 3 趟 收集 后 : ( 见 图 9-19) 

keynum= 3 recnum= 10 i=0 next=9 

1 keys = 278 otheritems = 1 next =7 
2 keys = 109 otheritems = 2 next=6 


= 3 keys = 063 otheritems = 3 next = 10 
4 keys = 930 otheritems = 4 next =0 
5 keys = 589 otheritems = 5 next= 4 


= 6 keys = 184 otheritems = 6 next =8 
i=7 keys = 505 otheritems =7 next =5 
i=8 keys = 269 otheritems = 8 next =1 
i=9 keys = 008 otheritems = 9 next =3 
i=10 keys = 083 otheritems = 10 next = 2 
008 063 083 109 184 269 278 505 589 930 
重 排 记录 后 (next 域 不 起 作用 ):( 见 图 9-20) 
keynum = 3 recnum = 10 i= 0 next =6 
i = 1 keys = 008 otheritems = 9 next =3 

2 keys = 063 otheritems = 3 next = 10 
= 3 keys = 083 otheritems = 10 next= 2 
= 4 keys = 109 otheritems = 2 next = 6 


5 keys = 184 otheritems = 6 next =8 


= 6 keys = 269 otheritems = 8 next = 1 
i=7 keys = 278 otheritems = 1 next = 7 
i=8 keys = 505 otheritems = 7 next=5 
i=9 keys = 589 otheritems = 5 next = 4 
i = 10 keys = 930 otheritems = 4 next =0 


In 
7| [0] 
278: 1|10| [1] 
697. 2 :6 E29 
063: 3|10| [3] 
930: 4| 3| [4] 
589: 5| 0| [5] 
184: 6| 5| [6] 
505: 7| 5| [7] 
269: 8| 1| [8] 
008: 9| 3| [9] 
083: 10 | 6| [10] 
99] 
3 
10 
图 9-18 第 3 趟 分 配 后 
m 
9] [o] 
278: 工 | 7 Ed 
109; 2| 6| [2] 
063: 3|10| [3] 
930: 4| 0| [4] 
589: 5| 4| [5] 
184: 6| 8| [6] 
505: 7| 5| [7] 
269: 8| 1| [8] 
008: 9| 3| [9] 
083; 10| 2| [10] 
: 99] 
3 
10 
图 9-19 第 3 趟 收集 后 
m 
[0] 
[1] 
[2] 
[3] 
[4] 
[5] 
[6] 
[7] 
[8] 
[9] 
[10] 
99] 
3 
10 


图 9-20 重 排 记 录 后 
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算法 10. 18 在 func9-2. cpp 中 。 


第 9 章 介绍 的 内 部 排序 需要 把 待 排序 的 数据 先 全 部 放 在 内 存 中 ,然后 再 排序 ,这 就 限制 
了 待 排序 数据 的 规模 。 当 数据 量 特别 大 时 ,软件 的 数据 区 有 可 能 放 不 下 。algol10-1. cpp 可 
说 明 这 个 问题 。 

// algol0-1.cpp 

间 define N 32767 

void main() 

{ 

int afN]; 

} 

在 Borland C++ 3. 1 编译 软件 下 , 当 N 三 32767 时 ,编译 algo10-1. cpp 顺利 通过 。 而 当 
NN 二 32767 时 ,编译 algo10-1. cpp 时 出 错 :“Array size too large”( 数 组 太 大 )。 这 个 例子 说 
明 , 要 对 多 于 32 767 个 整数 进行 内 部 排序 是 不 可 能 的 。 首 先 就 没有 足够 的 内 存 空间 存放 这 
些 数据 。 在 Visual C++6.0 环境 下 ,NN 的 范围 可 大 一 些 , 但 也 是 有 限 的 (在 Visual C++H6. 0 
环境 下 ,增加 了 语句 : for(int i 王 0;i<Nii++H) a[ 训 天 i )。 当 N 委 259 946 时 ,可 运行 
algol10-1. cpp, 而 当 N 二 259 946 时 ,运行 algo10-1. cpp 会 出 现 消息 框 ,提示 : 该 程序 执行 了 
非法 操作 。 经 Debug 查看 ,原因 是 :“Stack Overflow”( 堆 栈 溢出 ) 。 

本 章 介绍 在 没有 足够 的 内 存 空间 存放 待 排序 数据 的 情况 下 ,对 数据 进行 排序 的 方法 。 


10.1 外 部 排序 的 方法 


当 存放 待 排序 记录 的 文件 所 占 存储 空间 大 于 可 用 的 内 存 空 间 时 (把 这 样 的 文件 称 为 “大 
文件 ”) ,显然 不 能 采用 第 9 章 介 绍 的 内 部 排序 的 方法 ,将 文件 中 的 所 有 记录 一 次 读 入 内 存 进 
行 排序 。 在 这 种 情况 下 ,一般 是 根据 可 用 内 存 的 大 小 , 先 把 大 文件 分 几 次 读 入 内 存 , 对 每 次 
读 入 的 记录 进行 内 部 排序 ,生成 几 个 临时 的 有 序 子 文件 ,如 图 10-1 所 示 。 再 将 这 几 个 临时 
的 有 序 子 文件 归并 成 一 个 有 序 的 大 文件 ,这 个 过 程 就 称 为 “外 部 排序 ”。 

假设 内 存 空 间 只 能 存放 3 个 记录 , 则 有 15 个 记录 的 文件 就 是 “大 文件 "了 。 无 序 的 大 数 
据 文 件 fl0-1. txt 的 内 容 如 下 : 
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可 用 内 存 容量 
大 文件 
| | | | | 
有 序 的 子 文件 有 序 的 子 文件 有 序 的 子 文件 有 序 的 子 文件 。 ”有 序 的 子 文件 


图 10-1 将 1 个 无 序 的 大 文件 通过 内 部 排序 生成 几 个 有 序 的 子 文件 


161 
152 
103 
204 
95 

186 
227 
208 
409 
15 10 
25 11 
612 
12 13 
48 14 
37 15 


// algo10-2.cpp 将 无 序 的 大 文件 £10-1.txt( 记 录 个 数 =k*x N) 分 成 k 个 长 度 为 N 的 有 序 小 文件 的 程序 
间 include"cl.h" 
间 include"c8-2.h" // 对 两 个 数值 型 关键 字 比 较 的 约定 
typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 
typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 
间 include"c9-1.h" // 记录 的 数据 类 型 
间 include"c9-2.h" // 顺序 表 类 型 的 存储 结构 
# include"bo9-1. cpp" // 顺序 表 插 入 排序 的 函数 
间 include"func9-1.cpp" // 配套 的 输入 输出 函数 
间 define k 5 //k 路 归并 
间 define N 3 // 设 每 个 小 文件 最 多 有 个 数据 (可 将 整个 文件 一 次 读 人 内 存 的 称 为 小 文件 ) 
void main() 
{ 
SqList m; // 顺序 表 , 用 于 对 小 文件 进行 内 部 排序 
FILE x* f,xg; // 文件 指针 
char filename[3]; // 有 序 小 文件 名 
int 1,j; 
f= fopen("f10-1.txt","r"); // 以 读 的 方式 打开 含有 k*N 个 记录 的 未 排序 大 文件 f10-1. txt 
for(i= 0;i<kii++ ) // 将 大 文件 f10-1.txt 的 数据 分 成 组 
{ for(j=1;j<=N;j++ ) // 每 组 N 个 数据 
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InputFromFile(f,m.r[j]); // 由 数据 文件 输入 值 并 赋 给 m. rt[j] 
m. length = N; // 顺序 表 的 记录 长 度 
BInsertSort(m); // 对 顺序 表 m 作 折 半 插入 排序 ,使 m.r 成 为 有 序 表 
itoa(i,filename,10); // 二 作为 临时 的 有 序 小 文件 的 文件 名 
g= fopen(filename,"w"); // 依次 以 写 的 方式 打开 文件 0,1,…,k 一 1 
printf(" 有 序 子 文件 %s 的 数据 为 : " ,filename); 
Print(m); // 输出 排序 后 的 m 
for(j=1;j 二 = N;j++ ) // 依次 将 已 排序 的 m.r[j] 写 入 小 文件 0,1,…,k 一 1 
fprintf(g,"%d %d\n",m.r[j].key,.m.r[j].otherinfo); 
fclose(g); // 依次 关闭 小 文件 0,1,…,k 一 1 
} 
fclose(f); // 关闭 未 排序 的 大 文件 f10-1. txt 
} 


程序 运行 结果 : 


有 序 子 文件 0 的 数据 为 : (10,3)(15,2)(16,1) 
有 序 子 文件 1 的 数据 为 : (9,5)(18,6)(20,4) 
有 序 子 文件 2 的 数据 为 : (20,8) (22,7)(40,9) 
有 序 子 文件 3 的 数据 为 : (6,12)(15,10)(25,11) 
有 序 子 文件 4 的 数据 为 : (12,13)(37,15)(48,14) 


运行 algo10-2. cpp, 依 次 读 取 无 序 的 大 文件 {10-1. txt 中 的 数据 ,生成 了 5 个 文件 名 分 
别 为 0.1.2.3.4 的 有 序 子 文件 ,它们 的 内 容 如 下 : 


0 时 2 3 4 
10 3 95 208 612 12 13 
15 2 18 6 22 7 15 10 有 9 
16 1 20 4 40 9 25 11 48 14 


这 5 个 有 序 子 文件 可 供 下 一 节 的 程序 algo10-3. cpp 调用 归并 成 一 个 有 序 的 大 文件 。 
102 多 路 平衡 归并 的 实现 


将 多 个 有 序 的 子 文件 归并 成 1 个 有 序 的 大 文件 时 ,每 归并 1 次 ,就 要 在 外 存 读 1 次 记 
录 。 如 果 减 少 归 并 次 数 ,就 可 减少 读 文件 的 次 数 。 但 减少 归并 次 数 ,就 要 多 路 归并 (同时 将 
几 个 文件 进行 归并 )。 而 多 路 归并 要 在 多 个 关键 字 中 比较 ,找到 最 小 值 ,显然 是 较 慢 的 。 利 
用 “ 败 者 树 ” 可 减少 比较 次 数 。 

“ 败 者 树 ” 是 完全 二 又 树 , 所 以 采用 顺序 存储 结构 。 但 它 和 第 6 章 介绍 的 二 叉 树 顺序 存 
储 结构 又 有 两 点 不 同 。 

(1) 根 结 点 在 [1] 中 ([0] 存 胜出 者 )。 所 以 ,序号 为 j 的 结 点 ,其 双亲 结 点 的 序号 为 | j/2 ]。 

(2)“ 败 者 树 ”" 是 由 2 种 不 同类 型 的 结 点 组 成 的 : 

@ 叶子 结 点 : 是 外 部 结 点 ,其 类 型 为 记录 类 型 。 每 个 叶子 结 点 中 的 值 为 从 相应 的 有 序 
子 文件 读 出 的 当前 记录 。 叶 子 结 点 的 个 数 恰 为 待 归并 的 文件 数 k; 
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@ 非 叶子 结 点 : 是 度 为 2 的 内 部 结 点 ,其 类 型 为 整 型 ,存储 叶子 结 点 的 序号 。 非 叶子 结 
点 的 个 数 三 叶子 结 点 的 个 数 k 一 1。 
序号 为 s 的 叶子 结 点 ,其 双亲 结 点 的 序号 为 | (k 十 s)/2 |( 叶 子 结 点 的 序号 由 [0] 起 ) 。 
每 个 非 叶 子 结 点 中 的 值 为 其 左右 2 棵 子 树 中 的 2 个 胜 者 再 相 比 时 ,其 中 “ 败 者 ”的 序号 ,“ 胜 
者 ”再 向 上 一 级 去 比较 。 
最 终 “ 胜 者 ” 结 点 的 序号 存 于 败 者 树 的 根 结 点 之 上 的 [0j ,再 存 于 大 文件 中 。“ 胜 者 ”原先 
所 在 的 有 序 子 文件 的 下 一 个 数据 取代 “ 胜 者 ”在 叶子 结 点 中 的 位 置 , 继 续 比 较 , 求 出 新 的 “ 胜 
者 ”。 但 在 继续 比较 时 , 它 不 必 和 所 有 叶子 的 关键 字 去 比较 ,只 须 沿 着 从 相应 的 叶子 结 点 到 
根 结 点 的 路 径 去 调整 “ 败 者 树 ”"。 这 就 大 大 减少 了 比较 次 数 。 
一 个 新 的 叶子 结 点 取代 “ 胜 者 ”加 入 到 “ 败 者 树 ” 中 ,形成 新 的 “ 败 者 树 ”, 即 求 出 新 的 最 小 
值 ,需要 进行 比较 的 次 数 三 这 个 结 点 所 在 的 层 数 一 1。 
具有 N 个 叶子 结 点 的 * 败 者 树 ”, 共 有 2N 一 1 个 结 点 。 其 深度 为 | logs (2N 一 1) | 十 1, 求 
出 最 小 值 需要 进行 比较 的 次 数 =| logs (2N 一 1) ]。 而 用 一 般 的 方法 ,需要 比较 N 一 1 次 。 设 
N= 二 128, 利 用 “ 败 者 树 ” 只 需 比 较 7 次 ,否则 需 比 较 127 次 。 
bo10-1. cpp 是 k- 路 平衡 归并 要 调用 的 函数 。 归 并 路 数 k 的 值 在 调用 bo10-1. cpp 的 主 
程序 中 确定 。 
algo10-3. cpp 是 利用 “ 败 者 树 ” 进 行 外 部 排序 的 完整 程序 。 同 时 打开 在 上 一 节 运 行 
algo10-2. cpp 产生 的 5 个 含有 3 个 记录 、 并 按 关键 字 有 序 的 子 文件 0、1、2、3、4( 其 关键 字 正 
是 教科 书 中 图 11. 4 的 数据 ) ,利用 * 败 者 树 ” 归 并 成 1 个 有 序 的 大 文件 f10-3. txt。 
// bol0-1. cpp k- 路 平衡 归并 的 函数 ,包括 算法 11.1 一 算法 11.3 
void input (int i,RedType &a) 
{ // 从 第 个 文件 (归并 段 ) 读 和 人 记录 到 a 
fscanf(fp[i],"%d %d",&a.key,&a.otherinfo); 
} 
void output(RedType a) 
{ // 将 a 写 至 全 局 变量 fp[kj 所 指 的 文件 中 并 输出 
static int col = 0; // 静态 变量 ,计数 ,换行 用 
fprintf(fp[k],"%d %d\n" ,a.key,a. otherinfo); // 将 记录 a 写 人 大 文件 fp[k] 
Print(a); // 输出 a, 新 增 
if( +tcol %M== 0) 
printf("\n"); // 换行 


} 
void Adjust(LoserTree ls,int s) // 算法 11.2 
{ // 沿 从 叶子 结 点 全 局 变量 bLs] 到 根 结 点 全 局 变量 1s[1] 的 路 径 调整 败 者 树 , 胜 者 存 1s[0] 
int i,t; 
t= (s+k)/2; //t 是 全 局 变量 b[Ls] 的 双亲 结 点 的 序号 
while(t 二 0) //t 还 在 败 者 树 上 
{ 证 (b[s].key>bLls[t]].key) // bLs] 的 关键 字 大 于 其 双亲 结 点 的 关键 字 ( 是 败 者 ) 
{ i=s; // 交换 s 和 1s[t] 
s=1s[t]; // s 指 示 胜 者 ,将 和 b[s] 的 双亲 结 点 的 双亲 结 点 比较 
1s[t] = i; // bLs] 的 双亲 结 点 指示 败 者 bLs] 
人 
t=t/2; // 七 为 bLs] 的 双亲 结 点 的 双亲 结 点 的 序号 
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} 
1s[0] = s; // 胜 者 存 于 败 者 树 之 外 的 [0] 
} 
void CreateLoserTree(LoserTree 1s) 
// 已 知 全 局 变量 bL0]~b[k 一 1] 为 完全 二 叉 树 全 局 变量 1s 的 叶子 结 点 , 存 有 上 个 关键 字 ， 
// 沿 从 序号 最 大 的 叶子 到 根 的 k 条 路 径 将 1s 调整 成 为 败 者 树 。 算 法 11.3 
int i; 
b[kj.key= MIN_KEY; // [kj 中 存 最 小 关键 字 
for(i=1;i<k;++i) 
ls[i] =k; // 设置 1s 中 “ 败 者 ”的 初 值 为 有 最 小 关键 字 的 序号 (调整 中 必 会 被 败 者 取代 ) 
for(i=k-1;i 这 =0;--i) // 依次 从 序号 最 大 的 叶子 结 点 b[k- 菇 一 b[o] 出 发 调整 败 者 树 
Adjust(1s,i); // 沿 从 叶子 结 点 b[ 订 到 根 结 点 1s[1] 的 路 径 调 整 败 者 树 , 胜 者 存 1s[0] 


} 
void K Merge(LoserTree 1s) 
{ // 利用 全 局 变量 败 者 树 1s 将 编号 从 [0] 一 [k- 菇 的 上 个 输入 归并 段 中 的 记录 归并 到 输出 归并 段 。 
// 全 局 变量 bL0] 一 b[k- 1 为 败 者 树 上 的 上 个 叶子 结 点 ,分 别 存放 上 个 输入 归并 段 中 当前 
// 记录 的 关键 字 。 修 改 算法 11.1 
int i; 
for(i=0;i<k;++ i) // 依次 从 k 个 输入 归并 有 段 
{ input(i,b[i]); // 读 入 该 段 第 1 个 记录 到 外 结 点 b[ 订 
if(feof(fp[i])) // 读 记录 失败 (文件 中 无 记录 ) 
b[ 订 .key = MAX_KEY; // 设置 外 结 点 关键 字 的 值 为 最 大 
} 
CreateLoserTree(1s); 
// 初 建 败 者 树 1s[1. .k- 1], 树 外 结 点 1s[0] 指 示 b[0]~~b[k 1] 中 关键 字 最 小 者 ( 胜 者 ) 的 序号 
while(b[1s[0]].key!= MAX_KEY) // 胜出 的 关键 字 不 是 最 大 关键 字 (b[1s[0]] 是 文件 中 的 记录 ) 
{ output(b[1s[0]]); // 将 b[1s[0]] 输 出 到 文件 
input(1s[0],b[1s[0]]); // 从 编号 为 1s[0] 的 输入 归并 段 中 读 入 下 一 个 记录 到 b[1s[0]] 
if(feof(fp[1s[0]])) // 读 记录 失败 (文件 中 已 无 记录 ) 
b[1s[0]].key = MAX_KEY; // 设置 外 结 点 关键 字 的 值 为 最 大 
Adjust(1s,1s[0]); 
// 沿 从 取得 新 值 的 叶子 结 点 bLls[0]] 到 根 结 点 1s[1] 的 路 径 调整 败 者 树 , 选 出 新 的 最 小 关键 字 


} 


// algol0-3. cpp 调用 bo10-1.cpp 的 程序 (运行 algo10-2. cpp 后 运行 此 程序 ) 
间 include"cl.h" 

typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 

typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 

间 include"c9-1.h" // 记录 的 数据 类 型 

间 define k 5 // k(5) 路 归并 ,以 下 2 行 取 1 行 。 第 6 行 

// 提 define k 3 // 3 路 归并 。 第 7 行 

FILE x fp[k+1]; // k+1 个 文件 指针 (fp[kj] 为 大 文件 指针 ) ,全 局 变量 
typedef int LoserTree[k]; 

// [1..k-1] 是 败 者 树 的 非 叶子 结 点 ,[0] 中 是 胜 者 , 存 相应 叶子 的 序号 
RedType b[k+1]; // [0..k--1j] 是 败 者 树 的 叶子 (外 结 点 ),[kj] 存 最 小 关键 字 
并 define MIN KEY INT_MIN // 最 小 关键 字 


数据 结构 算法 解析 


提 define MAX_KFY INT_ MAX // 最 大 关键 字 
间 define M 10 // 设 输出 个 排序 后 的 数据 换行 
void Print(RedType t) 


{ 


printf("(%d, %d)",t.key,t. otherinfo); 


} 
间 include"bo10-1. cpp”// 上 路 平衡 归并 的 函数 


void main() 


{ 


} 


LoserTree 1s; // 败 者 树 ,长 度 为 k 的 整 型 数组 
int i; 
char outfile[10],filename[3]; // 大 文件 名 ,有 序 小 文件 名 
for(i=0;i<k;i+t+ ) 
{ itoa(i,filename,10); // i 作为 临时 的 有 序 小 文件 的 文件 名 

fp[i] = fopen(filename,"r"); // 以 读 的 方式 打开 已 排序 的 小 文件 0,1,…,k 一 1 
} 
printf(" 请 输入 排序 后 的 大 文件 名 : "); 
scanf("%s" ,outfile); // 输入 排序 后 的 大 文件 名 给 outfile 
fp[k] = fopen(outfile,"w"); // 以 写 的 方式 打开 排序 后 的 大 文件 outfile 
printf(" 有 序 大 文件 %s 的 记录 为 : \n" ,outfile); 
K_Merge(1s); // 利用 败 者 树 将 上 个 有 序 小 文件 中 的 记录 归并 为 1 个 有 序 大 文件 
printf("\n"); // 换行 
for(i=0;i<=k;i+t+ ) 

fclose(fp[i]); // 关闭 文件 0,1,… ,已 排序 的 大 文件 outfile 


程序 运行 结果 (以 教科 书 中 图 11. 4 的 数据 为 例 , 见 图 10-2 和 图 10-3): 


请 输入 排序 后 的 大 文件 名 : f10-3. txt x 

有 序 大 文件 £10-3. txt 的 记录 为 ， 
(6.12)(9,5)(10,3)(12.13)(15,10)(15.2)(16.1)(18,6)(20.4)(20.8) 
(22,7)(25,11)(37,15)(40,9)(48,14) 


运行 algo10-3. cpp 产生 的 有 序 的 大 文件 f10-3. txt 的 内 容 如 下 : 


612 
95 

103 

12 13 
15 10 
15 2 
16 1 

18 6 
20 4 
20 8 
这 多 人 
25 11 
3715 
409 
48 14 


[2]  bD] b[4] b[5] 20! 8|[2]  b[3] b[4] b[5] 


2|D] 由 此 结 点 开始 ,向 6112|[3] 


[4 小 序号 方向 调整 12113|[4] 


nl 5] in | [5] 


(a) 初 态 ,在 K_Merge() 中 给 b 和 ls 赋值 (b) 根据 b[ 和 调整 败 者 树 


ls 
5 [0] 
[5 [1] 
[3|2] 1s[2 
[2[ 
4|[4] Is[4] (4) 
b[0] bm] b[2] b b[2] 
[0] 10! 3|[0] 
品 本 加 
[2] bl3] bf] b[5] 20! 8|[2]  bG] b[4] b[5] 
2|[3] 6112|[3] 
[4] 12113|[4] 
[5] min | [5] 
(0) 根据 b[3] 调 整 败 者 树 (d) 根据 b[2] 调 整 败 者 树 
ls 
[3 [0] 
[1] 
op 
[210D] 
4|[4] 
b 
[0] 101 3|[0] 
b[3] b[4] b[5] 9 b[3] b[4] b[5] 
[2] 201 8|[2] 
D] 6112|[3] 
[和 12 113|[4 
[5] in [5] 
(e) 根据 b[1] 调 整 败 者 树 (f) 根据 b[0] 调 整 败 者 树 ,胜出 者 的 序号 在 1s[0] 


图 10-2 调用 CreateLoserTree() 示 例 


324 


数据 结构 算法 解析 


b[3] 


b[4] 


2018|[2]  b[3] b[4] b[5] 


(a) 初 态 ,输入 新 的 b[3] (b) 根据 新 的 b[3], 调 整 败 者 树 
图 10-3 输入 新 的 bL3] 后 调用 Adjust() 示 例 


103 置换 -选择 排序 


要 提高 外 部 排序 的 效率 ,除了 选择 “ 败 者 树 ” 归 并 方法 外 ,还 应 该 尽量 使 有 序 子 文件 较 
长 ,从 而 减少 待 归并 文件 的 数量 。 但 像 图 10-1 所 示 那 样 由 外 存 整 体 读 入 数据 到 内 存 , 经 内 
部 排序 后 ,再 整体 输出 到 外 存 形 成 的 有 序 子 文件 ,其 长 度 不 会 大 于 可 用 内 存 容量 。 

置换 -选择 排序 采取 增多 待 排序 记录 个 数 的 方法 使 生成 的 有 序 子 文件 更 长 。 具 体 算 法 
是 : 逐个 把 已 排序 的 记录 送 入 外 存 , 再 由 “大 文件 ” 读 入 一 个 记录 到 内 存 中 空 出 的 位 置 ,只 要 
这 个 记录 的 关键 字 不 小 于 刚 送 到 外 存 的 记录 的 关键 字 ,该 记录 就 会 排 到 当前 有 序 子 文件 中 。 

置换 -选择 排序 在 搜索 内 存 中 的 最 小 值 时 ,也 是 采用 败 者 树 。 和 多 路 平衡 归并 的 败 者 树 
不 同 的 是 ,外 结 点 多 了 1 个 存储 记录 段 号 的 rnum 域 。 如 果 新 读 入 的 记录 的 关键 字 小 于 刚 
送 到 外 存 的 记录 的 关键 字 , 则 设置 新 读 人 记录 的 段 号 比 刚 送 到 外 存 的 记录 的 段 号 大 1 ,标志 
新 读 和 人 的 记录 不 排 在 当前 的 有 序 子 文件 中 。 下 面 以 教科 书 中 图 11. 5 为 例 来 说 明 ， 

设 内 存 最 多 只 能 存放 6 个 记录 。 首 先 由 大 文件 FI 中 读 取 前 6 个 记录 (51,49,39,46， 
38,29) 到 内 存 WA ,它们 都 可 以 排 到 第 1 个 有 序 小 文件 中 , 故 设置 其 段 号 为 1。 找 出 其 中 的 
最 小 值 (29) , 存 于 外 存 文件 FO 中 作为 第 1 个 记录 。 再 由 大 文件 FI 读 取 第 7 个 记录 (14) 到 
内 存 WA ,占据 原 29 的 位 置 。 由 于 14 小 于 29, 所 以 14 不 可 能 被 排 到 第 1 个 有 序 小 文件 中 ， 
故 设置 其 段 号 为 2( 可 排 到 第 2 个 有 序 小 文件 中 )。 再 在 内 存 WA 中 不 小 于 29 的 (也 就 是 段 
号 为 1 的) 关键 字 中 找 最 小 值 , 找 到 38。 将 关键 字 为 38 的 记录 存 于 外 存 文件 FO 中 作为 第 
2 个 记录 。 再 由 大 文件 FI 读 取 第 8 个 记录 (61) 到 内 存 WA, 占 据 原 38 的 位 置 。 由 于 61 二 
38 ,所 以 61 可 以 排 在 第 1 个 有 序 小 文件 中 , 故 设置 其 段 号 为 1。 以 此 类 推 ,直到 内 存 WA 中 
所 有 的 关键 字 都 小 于 外 存 文件 FO 的 最 后 一 个 记录 的 关键 字 ( 即 段 号 都 为 2) ,第 1 个 初始 归 
并 段 完 成 。 开 始 建立 第 2 个 初始 归并 段 , 直 到 FI 的 所 有 记录 都 存 到 FO 的 初始 归并 段 中 。 

algol0-4. cpp 是 以 教科 书 中 图 11. 5 的 数据 为 例 采 用 置换 -选择 排序 的 方法 产生 初始 归 
并 段 文件 的 例子 。 按 照 一 般 的 方法 ,如 果 内 存 最 多 只 能 存放 6 个 记录 , 则 24 个 记录 要 产生 
4 个 初始 归并 段 文 件 。 而 采用 置换 -选择 排序 的 方法 只 产生 3 个 初始 归并 段 文件 。 
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无 序 的 大 数据 文件 {10-2. txt 的 内 容 如 下 : 


对 
492 
39'3 
46 4 
385 
29 6 
14 7 
61 8 
153 
30 10 
1 
48 12 
52 13 
3 14 
63 15 
27 16 
417 
13 18 
89 19 
24 20 
46 21 
58 22 
33 23 
76 24 


// algo10-4.cpp 通过 置换 -选择 排序 产生 不 等 长 的 初始 归并 段 文件 
间 include"cl.h" 

typedef int KeyType; // 定义 关键 字 的 类 型 为 整 型 

typedef int InfoType; // 定义 其 他 数据 项 的 类 型 为 整 型 

间 include"c9-1.h" // 记录 的 数据 类 型 

间 define MAX_KEY INT_MAX // 最 大 关键 字 

提 define w 6 // 设 内 存 工作 区 可 容纳 的 记录 个 数 

间 define M 10 // 设 输出 M 个 数据 换行 

typedef int LoserTree[ w]; 

// [1..w- 1j 是 败 者 树 的 非 叶 子 结 点 ,[0j 中 是 胜 者 , 存 相应 叶子 的 序号 
typedef struct 


{ RedType rec; // 记录 ( 见 图 10-1) WorkArea 
int rnum; // 所 属 归 并 段 的 段 号 rec| rnum | [0] 
}Workarea[w]; // 内 存 工作 区 ,容量 为 w( 见 图 10-4) Lid 


void InputFromFile(FILE# 上 .RedTYpe &c) 

{ // 从 文件 输入 记录 的 函数 
fscanf(f,"%d%d",&c.key,&c. otherinfo); [w] 

} 图 10-4 ”内存 工作 区 类 型 


数据 结构 算法 解析 


void OutputToFile(FILE # 工 .RedTYPe &c) 
{ // 向 文件 输出 记录 的 函数 
fprintf(f,"%d $%dNn" ,c.key,c. otherinfo); 
} 
void Select MiniMax(LoserTree ls,WorkArea wa.int q) // 算法 11.6 
{ // 从 wa[g] 起 到 败 者 树 的 根 比 较 选择 当前 段 的 最 小 记录 给 1s[0] 
int s,p,t= (w+q)/2; // 七 是 败 者 树 上 wa[qj] 的 双亲 结 点 序号 
for(p=1s[t];t>0;t=t/2,p=1s[t]) // 由 waLqj 的 双亲 结 点 逐 级 向 根 结 点 比较 
证 (wa[p].rnum 一 wa[q].rnum| |wa[p]. rnom == wa[q].rnum&& 
wa[p]. rec.key 一 wa[qj. rec.key) // wa[g] 的 双亲 结 点 的 段 值 小 或 段 值 同 关键 字 小 
{ s=q; // wa[q] 作 为 新 的 败 者 
q= 1s[t]; // q 指 示 新 的 胜利 者 ,继续 向 上 比较 
ls[t]=s; 
} 
1s[0] = q; // 最 终 胜利 者 的 序号 赋 给 1s[0] 
} 
void Construct Loser(LoserTree ls.WorkArea wa,FILE # fi) 
{ // 输入 w 个 记录 到 内 存 工 作 区 wa, 建 得 败 者 树 1s, 选 出 关键 字 最 小 的 记录 并 由 s[0] 指 示 
// 其 在 wa 中 的 位 置 。 修 改 算法 11.7 
int i; 
for(i=0;i<w;+ti) 
wa[ 订 .rnum= 1s[i] =0; // 初始 化 ,工作 区 的 段 值 为 0( 最 小 ), 败 者 树 指 示 最 后 调整 的 waLo] 
for(i=w-1;i>=0;--i) // 从 后 到 前 
{ InputFromFile(fi,wa[i].rec); // 由 文件 输入 1 个 记录 
wa[i]. rnum = 1; // 其 段 号 为 "1” 
Select_MiniMax(1s,wa,i); // 根据 新 输入 的 记录 调整 败 者 树 


void get_run(LoserTree ls.WorkArea wa.int rc,int&rmax,.FILE #fi.FILE 闪 fo) 
{ // 求 得 一 个 初始 归并 段 ,fi 为 输入 文件 指针 ,fo 为 输出 文件 指针 ,rc 为 当前 段 。 修 改 算法 11.5 
int q; 
KeyType minimax; 
while(wa[ 1s[0]]. rnum == rc) // 选 得 的 记录 属 当 前 段 时 
{ q=1s[0]; // q 指 示 选 得 的 记录 在 wa[] 中 的 位 置 
minimax = wa[ qj]. rec. key; // minimax 指示 选 得 的 记录 的 关键 字 
OutputToFile(fo,wa[q]. rec); // 将 选 得 的 记录 写 人 输出 文件 
printf("(%d, %d)" ,wa[q].rec.key,wa[q].rec.otherinfo); // 输出 
InputFromFile(fi,wa[qj.rec); // 从 输入 文件 读 入 下 一 记录 ,填补 输出 的 空位 
if(feof(fi)) // 输入 文件 结束 
wa[q].rnum = rmax+1; // 虚设 记录 为 下 一 段 ( 属 “rmax+1? 段 ) 
else // 输入 文件 非 空 时 
{ 证 (wa[q]. rec.key<nminimax) 
{ // 新 读 人 记录 的 关键 字 小 于 刚 输 出 到 文件 的 记录 的 关键 字 
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rmax= rc+1; // 设置 下 一 段 
wa[ qj. rnum = rmax; // 新 读 和 人 的 记录 属 下 一 段 
} 
else // 新 读 入 的 记录 属 当前 段 
wa[q].rnum = rc; 
} 
Select MiniMax(1s,wa,q); // 从 wa[q] 起 选择 新 的 当 段 最 小 关键 字 的 记录 


} 
void Replace _ Selection(LoserTree ls,WorkArea wa,FILE 闪 fi) 
{ // 在 败 者 树 1s 和 内 存 工作 区 wa 上 用 置换 -选择 排序 求 初始 归并 段 ， 
// 入 为 已 打开 的 输入 文件 (只 读 文 件 ) 指 针 。 修 改 算法 11.4 
int rc,rmax; 
FILE * fo; // 输出 文件 指针 
char filename[3]; // 有 序 小 文件 名 
Construct_Loser(1ls,wa,fi); // 初 建 败 者 树 
rc=rmax=1; // rc 指示 当前 生成 的 初始 归并 段 的 段 号 , 初 值 为 1 
do // rmax 指示 wa 中 关键 字 所 属 初始 归并 段 的 最 大 段 号 , 初 值 为 1 
{ itoa(rc- 1,filename,10); // rc- 1 作为 临时 的 有 序 小 文件 的 文件 名 
fo = fopen(filename,"w"); // 以 写 的 方式 打开 输出 文件 0,1,… 
printf("%s 的 内 容 为 : " ,filename); 
get_run(1s,wa,rc,rmax,fi,fo); // 求 得 段 号 为 rc 的 初始 归并 段 文件 
printf("\n"); 
fclose(fo); // 关闭 输出 文件 
rc= wa[1ls[0]].rnum; // 设置 下 一 段 的 段 号 
}while(rc 一 = rmax); //“rc = rmax+1” 标 志 输 入 文件 的 置换 -选择 排序 已 完成 
printf(" 共 产生 %d 个 初始 归并 段 文 件 \n" ,rc- 1); 
} 
void main() 
{ 
FILE *x fi; 


LoserTree 1s; 
WorkArea wa; 
fi = fopen("f10-2.txt","r"); // 以 读 的 方式 打开 无 序 大 文件 f10-2. txt 
Replace_Selection(1s,wa,fi); // 用 置换 -选择 排序 求 初始 归并 有 段 ( 有 序 小 文件 ) 
fclose(fi); // 关闭 无 序 大 文件 f10-2. txt 

上 


程序 运行 结果 (以 教科 书 中 图 11. 5 的 数据 为 例 , 见 图 10-5 和 图 10-6) : 


0 的 内 容 为 : (29,6)(38.5)(39.3)(46,4)(49,2)(51.1)(61,8) 

1 的 内 容 为 : (1,11)(3,14)(14,7)(15,9)(27,16)(30.10)(48,12)(52,13)(63,15)(89,19) 
2 的 内 容 为 : (4,17)(13,18) (24,20)(33,23)(46,21)(58,22)(76,24) 

共产 生 3 个 初始 归并 段 文件 


数据 结构 算法 解析 


ls ls 

0 [0] 0]00] 

ol] 10[1] 

0 02] 0|D] 

0 |[3] 01B] 

0 [4] 0|[4] 

0 5] 5][5] 

Ee 1s[4](©) i 1s[4] (0) 0 
10|[0] Wa[0] wa[l] 10|[0] Wal[0] Wal1] 
10|D] 1'0j[1] 51.1 
10|[2 10 2 
+0|D] ollollolo +0]B] 0 | olloljli 
6 [4] Wal2] Wa[3] War4] Wa[5] ol[4] Wal2] Wa[3] Wal4] Wal5 
10|[5] 51,111|[5] 

(a) 初 态 ,给 wa[],mum 和 IsD 赋 初 值 0 (b) 给 waf[5] 赋 值 并 调整 败 者 树 
ls ls 

[oj 中 [oO 

0[1] 0 [1] 

4|D] 4 |[2 

[0|GB3] [0 [G3] 

0|[4] 3[4 

51[5] 5 [5] 

wa wa 
10 [0] 四 出 
10[1] 10[1] 
10|D] |[49.2 [51L.1 | 10|[2] |[39,3 |[ 49.2 |[51,1] 
io] Lo oj (3931B] Lo LILLILILI 

35921114] Wal2] Wa[3] Wa[4] Wa[5] 49211|[4] Wal2] Wal3] wal4] Wal5] 
51,111|[5] 51.111|[5] 
(0) 给 wa[4] 赋 值 并 调整 败 者 树 (d) 给 wa[3] 赋 值 并 调整 败 者 树 
ls ls 
| 0 [0 [oO 
3[1 3[1] 

14 [2 [4|D] 

OB 1[3] 

21[4 2[4] 

5j[5 5j105] 

wa 1[4] 0 wa 
,0 [0] Wa[0] wa[1] ‘0J[0] 
10|[1] 38,511|[1] 

a6411 112] 46.4 | 39.3 |[49.2 |[51.1 46.411|[2 46.4 |[39,3 || 49.2 |[51.1 
39.311 |[3] 本 一 | 芭 汪 | 攻 39.311|[3] Tl 
49211|[4] Wa[2] Wa[3] Wa[4] Wa[5] 49.211|[4] Wal2] Wal3] Wal4] WalS 
51.111|[5] 51,111|[5] 

(e) 给 wa[2] 赋 值 并 调整 败 者 树 (1) 给 wa[1] 赋 值 并 调整 败 者 权 


图 10-5 调用 Construct_Loser () 初 建 败 者 树 示 例 


[0] 
[1 
D] 


w[e[-[*=[o=] = 


Wa 
29.611 


[0] 
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29.6 ||38.5 
1 1 


Wa[0] Wal1] 


38,511|[1] 


46,4 ||39.3 


[2] 


1 
46.4 ,1 1 


49,2 || 51,1 
1 1 


39,311 
49.211 
51.111 


B] 
[a 
[5] 


Wa[2] Wa[3] Wa[4] 


Wal5] 


(g) 给 wa[0] 赋 值 并 调整 败 者 树 ， 胜 出 者 的 序号 在 ls[0] 


外 部 排序 


图 10-5 ( 续 ) 
ls 
ls[0] (0) minimax 11|[0] Is[0] (1) minimax 
29 3[1] 29 
[4 加 
0|[3] 
[2|[4] 
14.7 |][38,5 5][5] 14,7 |[ 38,5 
Is[4](2 2 [Li wa ls[4] 2 | 1 | 
[0] Wa[0] Wal[1] 14.712][0] Wal[0] Wa[1] 
财 46,4][ 39,3 |[49,2 J[51,1 了 局 46.4 |[ 39,3 ||49.2 | 51.1 
1 1 1 1 1 1 1 
3 39,311|[3 
加 Wa[2] Wa[3] Wa[4] Wa[5] pom 加 Waf[2] Wa[3] Wa[4] Wa[5S 
[5] 51.111|[5] 
(a) 输出 wa[0], 再 赋 新 值 给 wa[0] (b) 从 wa[0] 起 调整 败 者 树 
ls 
minimax 3 |[0] minimax 
1 
4 [2] 
[0 G3] 
2 |[4] 
5 |[5] 4 
Is[4] 7 Sb8 we st4] (Ga 7 Sb8 
[0] Wal[0] wa[l] 14,712 |[0] Wal0] Wal1] 
[1 61.811|[1] 
问 | 46,4][39,3 |[49.2 J[51.1 46.411|[2 46.4][ 39.3 |[49,2 ][ 51.1 
BG] I 39.311 |[3] L TT 
[4] Wa[2] Wa[3] Wa[4] Wa[5] 492 [4 Wal[2] Wa[3] Wal[4] Wa[5] 
[5] 51,111|[5] 
(0) 输出 wa[1], 再 赋 新 值 给 wa[1] (d) 从 wa[1] 起 调整 败 者 树 


图 10-6 调用 get_run() 示 例 
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ls ls 
1|[0 2[0] 
3101 1|0D] 
4|[2 4|D] 
0|16 01DB] 
2|[4 13[4] 
5][5 5][5] 
Wa Wa 
14.712][0] 14.712][0] 
61.811|[1] 61.811|[1] 
a6411|[2] [46.4][15.9 [49.2 [51.1 46.411|[2] 46.4][ 15.9 |[49.2 |[51.1 
15.912|[3] 12 i 15.912|[3] 1 2 1 
49,211 |[4] Wa[2] Wa[3] Wa[4] Wa[5] 49.211|[4] Wa[2] Wa[3] Wa[4] Wal5 
51.111|[5] 51.111|[5] 
(e) 输出 wa[3], 再 赋 新 值 给 wa[3] (f) 从 wa[3] 起 调整 败 者 树 
图 10-6 ( 续 ) 
运行 algo10-4. cpp, 生 成 3 个 文件 名 分 别 为 0、1、2 的 有 序 子 文件 ,它们 的 内 容 如 图 10-7 


所 示 。 将 程序 algo10-3. cpp 的 第 6 行 作为 注释 ,启用 第 7 行 ,再 运行 algo10-3. cpp, 结 果 
如 下 。 


0 1 2 

29 6 1 11 417 
38 5 3 14 13 18 
39 3 14 7 24 20 
46 4 15 9 33 23 
49 2 27 16 46 21 
51 1 30 10 58 22 
61 8 48 12 76 24 

52 13 

63 15 

89 19 


图 10-7 3 个 有 序 子 文件 
程序 运行 结果 : 


请 输入 排序 后 的 大 文件 名 : f10-4. txt yx 

有 序 大 文件 ft10-4.txt 的 记录 为 : 
(1,11)(3,14)(4,17)(13,18)(14,7)(15.9)(24,20)(27,16)(29,6)(30.10) 
(33,23)(38,5)(39,3)(46,4)(46,21)(48.12)(49,2)(51,1)(52,13)(58,22) 
(61,8)(63,15)(76,24)(89,19) 


运行 algo10-3. cpp 产生 的 有 序 的 大 文件 {10-4. txt 的 内 容 如 下 : 


间 往生 
314 
7 
13 18 


第 10 章 ”外 部 排序 


147 
i139 
24 20 
27 16 
29 6 
30 10 
33 23 
38 5 
39.3 
46 4 
46 21 
48 12 
49 2 
52 13 
58 22 
61 8 
63 15 
76 24 
89 19 


需要 指出 的 是 ,程序 algo10-3. cpp 和 algo10-4. cpp 只 是 实现 多 路 平衡 归并 和 置换 -选择 
排序 的 示例 。 为 了 提高 效率 ,减少 LO 操作 ,由 文件 向 内 存 读 数据 和 把 内 存 数 据 写 到 文件 
还 应 以 “数据 块 ”为 单位 进行 。 以 上 两 程序 为 了 突出 算法 ,由 文件 向 内 存 读数 据 和 把 内 存 数 
据 写 到 文件 都 是 以 "一 个 数据 ?为 单位 进行 的 。 
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关于 标准 C 程 序 


本 书 中 的 程序 一 般 需 要 经 过 修改 才能 在 标准 C 的 环境 下 运行 ,主要 有 以 下 5 个 原因 。 
(1) 教科 书 中 的 算法 采用 了 C++ 语言 的 引用 调用 的 参数 传递 方式 。 在 形 参 表 中 ,以 && 
头 的 参数 即 为 引用 参数 。 
标准 C 不 支持 引用 参数 ,对 此 需 进行 转换 。 下 面 以 bol-1. cpp 中 DestroyTriplet( ) 函数 
为 例 来 说 明 这 种 转换 。bol-1. cpp 中 含有 引用 参数 的 函数 如 下 : 
Status DestroyTriplet (Triplet &T) 


{ free(T); 
T= NULL; 


return OK; 
} 
转换 成 能 在 标准 C 的 环境 下 运行 的 函数 如 下 : 
Status DestroyTriplet(Triplet #T) /# 将 形 参 8T 改 为 #*T #/ 
{ free( x 了 ); /x 将 函数 体 中 的 了 改 为 x*T x*/ 
x*T= NULL; /x* 将 函数 体 中 的 了 改 为 x*T x*/ 
return OK; 


} 

对 照 以 上 2 个 函数 可 见 : 将 C++ 函数 形 参 表 中 以 & 开头 的 参数 改 成 以 * 开头 的 参数 ， 
再 在 函数 体 中 该 参数 前 加 * 即 可 。 要 注意 的 是 ,在 这 两 个 函数 中 , 形 参 的 类 型 是 不 同 的 。 在 
bol-1. cpp 中 ,IT 的 类 型 是 Triplet; 在 转换 后 的 函数 中 ,TT 的 类 型 是 Triplet 的 指针 。 另 外 ， 
在 标准 C 程序 中 调用 该 函数 , 实 参 前 应 加 六 。 如 main1-1. cpp 中 调用 DestroyTriplet() 的 
语句 为 

DestroyTriplet(T); 

相应 地 ,在 标准 C 程序 中 调用 DestroyTriplet() 的 语句 为 

DestroyTriplet(&T); / x* 实 参 前 加 & x*/ 
其 中 ,在 调用 DestroyTriplet() 的 两 程序 中 ,两 实 参 工 的 类 型 是 相同 的 。 另 外 ,在 转换 过 程 
中 , 遇 到 & x 或 *&& 可 “抵消 ”, 即 将 x & 工 转换 为 工 。 

(2) 标准 C 在 指明 所 定义 的 结构 体 或 枚 举 类 型 时 ,在 类 型 前 要 加 struct 或 enum , 而 
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C++ 则 不 必 加 。 例 如 ,在 c2-1.h 中 定义 结构 体 SqList 如 下 : 
struct SqList 
{ ElemType * elem; 
int length; 
int listsize; 
和 
C++ 在 指明 变量 或 形 参 的 类 型 时 ,只 须 用 SqList 即 可 。 例 如 ,bo2-1. cpp 中 的 一 个 函数 
如 下 ， 
int ListLength(SqList L) 


{ return L. length; 
} 


如 果 在 标准 C 程序 中 像 c2-1. h 那样 定义 变量 工 的 类 型 , 则 应 修改 以 上 函数 如 下 : 


int ListLength( struct SqList L) / # SqList 前 加 struct 其/ 
{ return L. length; 
} 


说 明 形 参 工时 要 用 struct SqList。 
当 用 到 某 个 结构 体 就 要 在 其 类 型 前 加 struct, 用 到 某 个 枚 举 类 型 就 要 在 其 类 型 前 加 enum 
是 很 麻烦 的 。 为 了 方便 起 见 , 可 用 typedef 定义 类 型 。 在 标准 C 程序 中 定义 SqList 如 下 : 


typedef struct / x struct 前 加 typedef * / 
{ ElemType * elem; 

int length; 

int listsize; 


}SqList; /* 结构 体 名 在 此 处 */ 
这 样 ,bo2-1. cpp 不 必 做 任何 修改 就 可 以 用 在 标准 C 程序 中 了 。 

可 见 , 只 要 在 定义 结构 体 时 使 用 typedef, 则 在 指明 结构 体 的 类 型 时 就 不 必 加 struct。 
定义 枚 举 类 型 时 使 用 typedef 的 方法 与 此 类 似 。 

(3) 标准 C 的 共用 体 必须 有 变量 名 ,而 C++ 可 以 省 略 。 例 如 ,在 c5-5.h 中 定义 GLNodel 
如 下 : 


typedef struct GLNodel 
{ ElemTag tag; 


union 
{ AtomType atom; 
GLNodel * hp; 
}; // 共用 体 可 以 没有 变量 名 
GLNodel * tp; 
} * GList1 ,GLNodel ; 


注意 : 其 中 的 共用 体 union 没有 变量 名 。 
bo5-6. cpp 中 的 函数 GListEmpty() 如 下 : 


数据 结构 算法 解析 
334 


Status GListEmpty(GList1 L) 
{ if(!L->hp) 
return OK; 
else 
return ERROR; 
} 


而 在 标准 C 下 ,对 c5-5.h 要 作 如 下 修改 : 


typedef struct GLNodel 
{ ElemTag tag; 
union 
{ AtomType atom; 
struct GLNodel * hp; 
}a; /* 给 共用 体 加 变量 名 */ 
struct GLNodel * tp; 
} * GList1 ,GLNodel; 


GLNodel 内 部 的 共用 体 必须 有 变量 名 。bo5-6. cpp 中 的 函数 GListEmpty() 也 要 作 相 
应 修改 ， 


Status GListEmpty(GList1 工 ) 
{ if(IL->a.hp) /x* hp 前 加 a. */ 
return OK; 
else 
return ERROR; 
} 


(4) C++ 可 重 载 。 在 一 个 程序 中 ,可 有 几 个 同名 的 函数 同时 存在 ,只 要 它们 的 形 参 个 数 
或 类 型 有 所 不 同 即 可 。 标 准 C 不 可 重 载 。 在 C++ 转换 成 标准 C 时 ,必须 将 同名 函数 改 为 不 
同名 。 如 在 bo8-2. cpp 中 有 1 个 SearchBST() 函数 (算法 9.5(b)) ,在 func8-4. cpp 中 也 有 1 
个 SearchBST() 函 数 ( 算 法 9.5(a)) ,它们 都 被 algo8-4. cpp 调用 。 但 这 两 个 同名 函数 的 形 
参 个 数 不 同 。C++ 根 据 函数 的 形 参 个 数 可 分 辨 所 调用 的 是 哪个 函数 ,而 标准 C 没有 这 个 能 
力 , 所 以 在 标准 C 中 要 将 其 中 的 1 个 SearchBST() 函 数 改 名 为 SearchBST1() 函 数 。 

(5) 在 C++ 中 ”// ”后 到 本 行 末 的 内 容 为 注释 ,而 标准 C 的 注释 必须 放 在 */ x*”、“ x /” 
之 间 。 如 上 许多 例子 所 示 。 


[1 
[2] 


[3] 
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